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This is a request under 3 7 C.F.R. 
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^ (X) Continuation application, 

rfi ( ) Divisional application, 

iCi ( ) Continuation-in-Part application, 



CERTIFICATE OF MAILING BY "EXPRESS MAIL" 
"Express Mail" Mailing Label Number 

EL 600581103 US 



Date of Deposit 



October 20, 2000 



I hereby certify that this paper or fee is 
being deposited with the United States 
Postal Service "Express Mail Post Office to 
Addressee" Service under 37 CFR §1.10 on 
the date indicated above and is addressed 
to the Commissioner of Patents and 
Trademarks, Washington, D.C. 2 0231. 

Edward Price 

son mailing) 
* 

_ _ 'C-*L. 

( Signature of p 




of pending prior application number 09/161,84 0 , 

filed on September 28, 1998 of James J. Fitzgibbon et al 
(Date) ( Inventor (s) ) 

for MOVABLE BARRIER OPERATOR 

(Title) 



(X) This is a continuation or divisional application. Enclosed is 
a copy of the prior application as originally filed, including 
specification, claims, drawings, and oath or declaration. 



- or - 

(X) Enclosed is a patent application (for continuation, divisional, 
or continuation-in-part applications) containing: 

(X) 145 pages of the specification (including claims) . 

(X) 45 sheets of drawings ( ) Formal (X) Informal. 



2. (X) Amend the specification by inserting before the first line 
the sentence: --This is a [X] continuation, [ ] division, 
[ ] continuation-in-part, of prior application number 

09/161,840 filed September 28, 1998 , 

which is hereby incorporated herein by reference in its 
entirety.-- The entire disclosure of the prior application, from 
which a copy of the oath or declaration is supplied under 
paragraph 3 below, is considered as being part of the disclosure 
of the accompanying application, and is hereby incorporated by 
reference therein. 
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3. (X) A copy of the executed oath or declaration filed in the prior 

nonprovisional application is enclosed. 

4. ( ) Inventorship: 

( ) A newly-executed oath or declaration and power of attorney 
is enclosed (for continuation-in-part applications, or 
for continuation or divisional applications naming an 
inventor not named in the prior application) (§1.63 (a), 
(d) (5) and (e) ) . 

( ) Because this application is being filed by fewer than all of 
the inventors named in the prior application, delete the 
following inventor (s) named in the prior nonprovisional 
application (37 C.F.R. §1 . 63 (d) (1) (2) ) : 



( ) The names of persons believed to be the actual inventors are 
set forth in the enclosed unexecuted oath or declaration and 
power of attorney (§1.41 (a) and §1. 53(b)). 

5. ( ) Assignment (s) of the invention to _ > and 

cover sheet are enclosed. 

( ) A check in the amount of $ to cover the fee for 

recording the assignment ( s ) is enclosed. 

6. (X) The prior application is assigned of record to 

THE CHAMBERLAIN GROUP ■ INC. . • 

7. ( ) Small Entity Status (37 C.F.R. §1 . 28 (a) (2) ) : 

( ) A statement of status as a small entity is enclosed. 

( ) A statement of status as a small entity was filed in the 
prior application, and small entity status is still proper 
and desired in this new nonprovisional application. 

( ) Status as a small entity is no longer claimed. 

8. ( ) A 37 C.F.R. §3.73 (b) statement is enclosed (where an assignee 

seeks to take action in a matter before the Patent Office) . 

9. (X) A preliminary amendment is enclosed. 

10. ( ) Drawings: 

( ) Transfer the drawings from the prior application to this 
application and abandon said prior application as of the 
filing date accorded this application. A duplicate copy of 
this sheet is enclosed for filing in the prior application 
file. (May be used only if signed by person authorized by 
§1.138 and before payment of base issue fee.) 
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( ) New formal drawings are enclosed. 
( ) Informal drawings are enclosed. 

11. (X) A separate written request under 37 C.F.R. §1.136 (a) (3), which is 

a general authorization to treat any concurrent or future reply 
requiring a petition for an extension of time under 3 7 C.F.R. 
§1.136 (a) for its timely submission as incorporating a petition 
for an extension of time for the appropriate length of time, is 
enclosed . 

12. ( ) An Information Disclosure Statement is enclosed. 

( ) A Form PTO-1449 is enclosed. 

( ) References (copies) listed on the Form PTO-1449 are 

enclosed . 

13. ( ) A MicroFiche Computer Program (Appendix) is enclosed. 

14. (X) A Return Receipt Postcard is enclosed (MPEP §503). 

15. ( ) A Nucleotide and/or Amino Acid Sequence Submission is enclosed. 

( ) A Computer Readable Copy is enclosed. 

( ) A Paper Copy (Identical to Computer Copy) is enclosed. 

( ) A Statement Verifying Identity of above Copies is enclosed. 

16 ( ) Priority of application number / filed on 

i n is claimed under 

35 U.S.C. §119. 

( ) The certified copy of the priority document has been filed 
in prior application number / / filed . 

( ) A certified copy of the priority document is enclosed. 

17. (X) Power of Attorney: 

(X) The power of attorney in the prior application is to: 

(X) Timothy E. Levstik Reg. No. 30 , 192 , 

FITCH, EVEN, TABIN, & FLANNERY 

120 South LaSalle Street, Suite 1600 

Chicago, Illinois 60603-3406 

and other members of the firm. 

(X) Customer Number 22242. 
( ) The power appears in the original papers in the prior application. 

( ) Since the power does not appear in the original papers in the 
prior application, a copy of the power in the prior application 
is enclosed. 
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18 (X) Cancel in this application original claims 1-5 and 7-3 0 . 

of the prior application before calculating 

the filing fee. (At least one original independent claim must be 
retained for filing purposes.) 

19. (X) The filing fee is calculated below: 

Fee Calculation for Claims as Filed in the Prior Application, 
Less Any Claims Cancelled by A mendment 



20 . 

21 . 

22 . 

23 , 

24 
25 



(X) 
( ) 
( ) 

(X) 



(X) Basic Utility Fee 

• (X) Independent Claims 

• (X) Total Claims 2_ 



3 = 



20 



0 



$ 710.00 S 710.00 
x $ 8 0.00 = 5 -0- 
x $ 18.00 = S -0- 



$270 .00 



$. 
$. 
$. 
$. 



710 . 00 



710 . 00 



(X) 



• ( ) Fee for Multiply Dependent Claims 
or 

( ) Basic Design Fee $ 320.00 

Total of above Calculations 
Reduction by 50% for Filing by Small Entity 

Total 

A check in the amount of S 710 . 00 is enclosed. 

Charge $ to Deposit Account No. 06-1135. 

The payment of the Filing Fee is to be deferred until the 
Declaration is Filed. Do not charge our Deposit Account. 

The Commissioner is hereby authorized to charge any fees which may 
be required under 37 C.F.R. §§1.16 and 1.17 and are not paid 
herewith, or credit any overpayment, to Deposit Account Number 
06-1135. A duplicate copy of this request is enclosed. 

Also enclosed: 

Address all future communications to Customer Number 22242. 




FITCH / EVEN, TABIN & FLANNERY 
Suite 1600 

120 South LaSalle Street 
Chicago, Illinois 60603-3406 
Telephone: (312) 577-7000 
Facsimile: (312) 577-7007 



October 20, 20 0 0 



(Date! 





fimothy E 
Registrat 
(X) Attorn'ey or agent of record 
( ) Filed under §1.34 (a) 
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( ) A paper requesting correction/substitution of drawings is attached, 

(X) No additional fee is required. 
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Independent Claims 2 
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Account No. 06-1135. Should no proper payment be enclosed herewith, 
as by a check being in the wrong amount, unsigned, post-dated, other- 
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Hon. Commissioner of Patents 
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PRELIMINARY AMENDMENT 

Sir : 

This Amendment is being filed prior to a first Office 
Action in the above -captioned application. Please amend the 
instant application as follows: 

IN THE CLAIMS : 

Please add the following new claim 31: 

31. A movable barrier operator having linearly variable 
output speed, comprising: 

an electric motor having a motor output shaft; 

a transmission connected to the motor output shaft to be 
driven thereby and to the movable barrier to be moved; 

a circuit for providing a pulse signal comprising a series 
of pulses; 
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a motor control circuit responsive to the pulse signal, for 
starting the motor and for determining the direction of rotation 
of the motor output shaft; and 

a controller for controlling the pulses in the pulse signal 
in accordance with a predetermined set of values, wherein in 
accordance with the predetermined set of values, a speed of the 
motor is linearly varied from zero to a maximum speed and from 
the maximum speed to zero . 



are pending in the application. Applicants submit that no new 
matter has been added and respectfully request that the 
application be amended to include new claim 31 set forth above. 



additional fees which may be required with respect to this 
communication or credit any overpayment to Deposit Account No. 
06-1135 . 
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Upon entry of the instant amendment, claims 6 and 31 
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MOVABLE BARRIER OPERATOR 

Background of the Invention 
This invention relates generally to movable barrier 
operators for operating movable barriers or doors. More 
particularly, it relates to garage door operators having 
improved safety and energy efficiency features. 

Garage door operators have become more sophisticated 
over the years providing users with increased convenience 
and security. However, users continue to desire further 
improvements and new features such as increased energy 
efficiency, ease of installation, automatic 
configuration, and aesthetic features, such as quiet, 
smooth operation. 

In some markets energy costs are significant. Thus 
energy efficiency options such as lower horsepower motors 
and user control over the worklight functions are 
important to garage door operator owners. For example, 
most garage door operators have a worklight which turns 
on when the operator is commanded to move the door and 
shuts off a fixed period of time after the door stops. 
In the United States, an illumination period of 4 1/2 
minutes is considered adequate. In markets outside the 
United States, 4 1/2 minutes is considered too long. 
Some garage door operators have special safety features, 
for example, which enable the worklight whenever the 
obstacle detection beam is broken by an intruder passing 
through an open garage door. Some users may wish to 
disable the worklight in this situation. There is a need 
for a garage door operator which can be automatically 
configured for predefined energy saving features, such as 
worklight shut-off time. 

Some movable barrier operators include a flasher 
module which causes a small light to flash or blink 
whenever the barrier is commanded to move. The flasher 
module provides some warning when the barrier is moving. 
There is a need for an improved flasher unit which 
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-provides even greater warning to the user when the 
barrier is commanded to move. 

Another feature desired in many markets is a smooth, 
quiet motor and transmission. Most garage door operators 
have AC motors because they are less expensive than DC 
motors. However, AC motors are generally noisier than DC 
motors . 

Most garage door operators employ only one or two 
speeds of travel. Single speed operation, i.e., the 
motor immediately ramps up to full operating speed, can 
create a jarring start to the door. Then during closing, 
when the door approaches the floor at full operating 
speed, whether a DC or AC motor is used, the door closes 
abruptly with a high amount of tension on it from the 
inertia of the system. This jarring is hard on the 
transmission and the door and is annoying to the user. 

If two operating speeds are used, the motor would be 
started at a slow speed, usually 20 percent of full 
operating speed, then after a fixed period of time, the 
motor speed would increase to full operating speed. 
Similarly, when the door reaches a fixed point 
above/below the close/open limit, the operator would 
decrease the motor speed to 20 percent of the maximum 
operating speed. While this two speed operation may 
eliminate some of the hard starts and stops, the speed 
changes can be noisy and do not occur smoothly, causing 
stress on the transmission. There is a need for a garage 
door operator which opens the door smoothly and quietly, 
with no aburptly apparent sign of speed change during 
operation . 

Garage doors come in many types and sizes and thus 
different travel speeds are required for them. For 
example, a one-piece door will be movable through a 
shorter total travel distance and need to travel slower 
for safety reasons than a segmented door with a longer 
total travel distance. To accommodate the two door 
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types, many garage door operators include two sprockets 
for driving the transmission. At installation, the 
installer must determine what type of door is to be 
driven, then select the appropriate sprocket to attach to 
the transmission. This takes additional time and if the 
installer is the user, may require several attempts 
before matching the correct sprocket for the door. There 
is a need for a garage door operator which automatically 
configures travel speed depending on size and weight of 
the door. 

National safety standards dictate that a garage door 
operator perform a safety reversal (auto-reverse) when an 
object is detected only one inch above the DOWN limit, or 
floor. To satisfy these safety requirements, most garage 
door operators include an obstacle detection system, 
located near the bottom of the door travel. This 
prevents the door from closing on objects or persons that 
may be in the door path. Such obstacle detection systems 
often include an infrared source and detector located on 
opposite sides of the door frame. The obstacle detector 
sends a signal when the infrared beam between the source 
and detector is broken, indicating an obstacle is 
detected. In response to the obstacle signal, the 
operator causes an automatic safety reversal. The door 
stops and begins traveling up, away from the obstacle. 

There are two different "forces" used in the 
operation of the garage door operator. The first "force" 
is usually preset or setable at two force levels: the UP 
force level setting used to determine the speed at which 
the door travels in the UP direction and the DOWN force 
level setting used to determine the speed at which the 
door travels in the DOWN direction. The second "force" 
is the force level determined by the decrease in motor 
speed due to an external force applied to the door, i.e., 
from an obstacle or the floor. This external force level 
is also preset or setable and is any set-point type force 



against which the feedback force signal is compared. 
When the system determines the set point force has been 
met, an auto-reverse or stop is commanded. 

To overcome differences in door installations, i.e. 
stickiness and resistance to movement and other varying 
f rictional-type forces, some garage door operators permit 
the maximum force (the second force) used to drive the 
speed of travel to be varied manually. This, however, 
affects the system's auto-reverse operation based on 
force. The auto-reverse system based on force initiates 
an auto-reverse if the force on the door exceeds the 
maximum force setting (the second force) by some 
predetermined amount. If the user increases the force 
setting to drive the door through a "sticky" section of 
travel, the user may inadvertently affect the force to a 
much greater value than is safe for the unit to operate 
during normal use. For example, if the DOWN force 
setting is set so high that it is only a small 
incremental value less than the force setting which 
initiates an auto-reverse due to force, this causes the 
door to engage objects at a higher speed before reaching 
the auto-reverse force setting. While the obstacle 
detection system will cause the door to auto-reverse, the 
speed and force at which the door hits the obstacle may 
cause harm to the obstacle and/or the door. 

Barrier movement operators should perform a safety 
reversal off an obstruction which is only marginally 
higher than the floor, yet still close the door safely 
against the floor. In operator systems where the door 
moves at a high speed, the relatively large momentum of 
the moving parts, including the door, accomplishes 
complete closure. In systems with a soft closure, where 
the door speed decreases from full maximum to a small 
percentage of full maximum when closing, there may be 
insufficient momentum in the door or system to accomplish 
a full closure. For example, even if the door is 



positioned at the floor, there is sometimes sufficient 
play in the trolley of the operator to allow the door to 
move if the user were to try to open it. In particular, 
in systems employing a DC motor, when the DC motor is 
5 shut off, it becomes a dynamic brake. If the door isn't 
quite at the floor when the DOWN travel limit is reached 
and the DC motor is shut off, the door and associated 
moving parts may not have sufficient momentum to overcome 
the braking force of the DC motor. There is a need for a 

10 garage door operator which closes the door completely, 
eliminating play in the door after closure. 

Many garage door operator installations are made to 
existing garage doors. The amount of force needed to. 
drive the door varies depending on type of door and the 

15 quality of the door frame and installation. As a result, 
some doors are "stickier" than others, requiring greater 
force to move them through the entire length of travel. 
If the door is started and stopped using the full 
operating speed, stickiness is not usually a problem. 

20 However, if the garage door operator is capable of 

operation at two speeds, stickiness becomes a larger 
problem at the lower speed. In some installations, a 
force sufficient to run at 20 percent of normal speed is 
too small to start some doors moving. There is a need 

25 for a garage door operator which automatically controls 
force output and thus start and stop speeds. 

Summary of the Invention 
A movable barrier operator having an electric motor 
for driving a garage door, a gate or other barrier is 
30 operated from a source of AC current. The movable 

barrier operator includes circuitry for automatically 
detecting the incoming AC line voltage and frequency of 
the alternating current. By automatically detecting the 
incoming AC line voltage and determining the frequency, 
35 the operator can automatically configure itself to 
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certain user preferences. This occurs without either the 
user or the installer having to adjust or program the 
operator. The movable barrier operator includes a 
worklight for illuminating its immediate surroundings 
5 such as the interior of . a garage. The barrier operator 
senses the power line frequency (typically 50 Hz or 60 
Hz) to automatically set an appropriate shut-off time for 
a worklight. Because the power line frequency in Europe 
is 50 Hz and in the U.S. is 60 Hz, sensing the power line 

10 frequency enables the operator to configure itself for 
either a European or a U.S. market with no user or 
installer modifications. For U.S. users, the worklight 
shut-off time is set to preferably 4 1/2 minutes; for 
European users, the worklight shut-off time is set to 

15 preferably 2 1/2 minutes. Thus, a single barrier 

movement operator can be sold in two different markets 
with automatic setup, saving installation time. 

The movable barrier operator of the present 
invention automatically detects if an optional flasher 

20 module is present. If the module is present, when the 
door is commanded to move, the operator causes the 
flasher module to operate. With the flasher module 
present, the operator also delays operation of the motor 
for a brief period, say one or two seconds. This delay 

25 period with the flasher module blinking before door 

movement provides an added safety feature to users which 
warns them of impending door travel (e.g. if activated by 
an unseen transmitter) . 

The movable barrier operator of the present 

30 invention drives the barrier, which may be a door or a 
gate, at a variable speed. After motor start, the 
electric motor reaches a preferred initial speed of 20 
percent of the full operating speed. The motor speed 
then increases slowly in a linearly continuous fashion 

35 from 20 percent to 100 percent of full operating speed. 
This provides a smooth, soft start without jarring the 



transmission or the door or gate. The motor moves the 
barrier at maximum speed for the largest portion of its 
travel, after which the operator slowly decreases speed 
from 100 percent to 20 percent as the barrier approaches 
the limit of travel, providing a soft, smooth and quiet 
stop. A slow, smooth start and stop provides a safer 
barrier movement operator for the user because there is 
less momentum to apply an impulse force in the event of 
an obstruction. In a fast system, relatively high 
momentum of the door changes to zero at the obstruction 
before the system can actually detect the obstruction. 
This leads to the application of a high impulse force. 
With the system of the invention, a slower stop speedy 
means the system has less momentum to overcome, and 
therefore a softer, more forgiving force reversal. A 
slow, smooth start and stop also provide a more 
aesthetically pleasing effect to the user, and when 
coupled with a quieter DC motor, a barrier movement 
operator which operates very quietly. 

The operator includes two relays and a pair of field 
effect transistors (FETs) for controlling the motor. The 
relays are used to control direction of travel. The 
FET's, with phase controlled, pulse width modulation, 
control start up and speed. Speed is responsive to the 
duration of the pulses applied to the FETs. A longer 
pulse causes the FETs to be on longer causing the barrier 
speed to increase. Shorter pulses result in a slower 
speed. This provides a very fine ramp control and more 
gentle starts and stops. 

The movable barrier operator provides for the 
automatic measurement and calculation of the total 
distance the door is to travel. The total door travel 
distance is the distance between the UP and the DOWN 
limits (which depend on the type of door) . The automatic 
measurement of door travel distance is a measure of the 
length of the door. Since shorter doors must travel at 
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slower speeds than normal doors (for safety reasons) , 
this enables the operator to automatically adjust the 
motor speed so the speed of door travel is the same 
regardless of door size. The total door travel distance 
in turn determines the maximum speed at which the 
operator will travel. By determining the total distance 
traveled, travel speeds can be automatically changed 
without having to modify the hardware. 

The movable barrier operator provides full door or 
gate closure, i.e. a firm closure of the door to the 
floor so that the door is not movable in place after it 
stops. The operator includes a digital control or 
processor, specifically a microcontroller which has an 
internal microprocessor, an internal RAM and an internal 
ROM and an external EE PROM . The microcontroller executes 
instructions stored in its internal ROM and provides 
motor direction control signals to the relays and speed 
control signals to the FETs . The operator is first 
operated in a learn mode to store a DOWN limit position 
for the door. The DOWN limit position of the door is 
used as an approximation of the location of the floor (or 
as a minimum reversal point, below which no auto-reverse 
will occur) . When the door reaches the DOWN limit 
position, the microcontroller causes the electric motor 
to drive the door past the DOWN limit a small distance, 
say for one or two inches. This causes the door to close 
solidly on the floor. 

The operator embodying the present invention 
provides variable door or gate output speed, i.e., the 
user can vary the minimum speed at which the motor starts 
and stops the door. This enables the user to overcome 
differences in door installations, i.e. stickiness and 
resistance to movement and other varying functional-type 
forces. The minimum barrier speeds in the UP and DOWN 
directions are determined by the user-configured force 
settings, which are adjusted using UP and DOWN force 



potentiometers. The force potentiometers set the lengths 
of the pulses to the FETs, which translate to variable 
speeds. The user gains a greater force output and a 
higher minimum starting speed to overcome differences in 
door installations, i.e. stickiness and resistance to 
movement and other varying functional-type forces speed, 
without affecting the maximum speed of travel for the 
door. The user can configure the door to start at a 
speed greater than a default value, say 20 percent. This 
greater start up and slow down speed is transferred to 
the linearly variable speed function in that instead of 
traveling at 20 percent speed, increasing to 100 percent 
speed, then decreasing to 20 percent speed, the door may, 
for instance, travel at 40 percent speed to 100 percent 
speed and back down to 40 percent speed. 

Brief Description of the Drawings 
Fig. 1 is a perspective view of a garage having 

mounted within it a garage door operator embodying the 

present invention; 

Fig. 2 is an exploded perspective view of a head 

unit of the garage door operator shown in Fig. 1; 

Fig. 3 is an exploded perspective view of a portion 

of a transmission unit of the garage door operator shown 

in Fig. 1; 

Fig. 4 is a block diagram of a controller and motor 
mounted within the head unit of the garage door operator 
shown in Fig. 1; 

Figs. 5A-5D are a schematic diagram of the 
controller shown in block format in Fig. 4; 

Figs. 6A-6B are a flow chart of an overall routine 
that executes in a microprocessor of the controller shown 
in Figs. 5A-5D; 

Figs. 7A-7H are a flow chart of the main routine 
executed in the microprocessor; 
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Fig. 8 is a flow chart of a set variable light shut- 
off timer routine executed by the microprocessor; 

Figs. 9A-9C are a flow chart of a hardware timer 
interrupt routine executed in the microprocessor; 

Figs. 10A-10C are a flow chart of a 1 millisecond 
timer routine executed in the microprocessor; 

Figs. 11A-11C are a flow chart of a 125 millisecond 
timer routine executed in the microprocessor; 

Figs. 12A-12B are a flow chart of a 4 millisecond 
timer routine executed in the microprocessor; 

Figs. 13A-13B are a flow chart of an RPM interrupt 
routine executed in the microprocessor; 

Fig. 14 is a flow chart of a motor state machine, 
routine executed in the microprocessor; 

Fig. 15 is a flow chart of a stop in midtravel 
routine executed in the microprocessor; 

Fig. 16 is a flow chart of a DOWN position routine 
executed in the microprocessor; 

Figs. 17A-17C are a flow chart of an UP direction 
routine executed in the microprocessor; 

Fig. 18 is a flow chart of an auto-reverse routine 
executed in the microprocessor; 

Fig. 19 is a flow chart of an UP position routine 
executed in the microprocessor; 

Figs. 20A-20D are a flow chart of the DOWN direction 
routine executed in the microprocessor; 

Fig. 21 is an exploded perspective view of a pass 
point detector and motor of the operator shown in Fig. 2; 

Fig 22A is a plan view of the pass point detector 
shown in Fig. 21; and 

Fig. 22B is a partial plan view of the pass point 
detector shown in Fig. 21. 

Detailed Description of the Preferred Embodiment 
Referring now to the drawings and especially to Fig. 
1, a movable barrier or garage door operator system is 
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generally shown therein and referred to by numeral 8. 
The system 8 includes a movable barrier operator or 
garage door operator 10 having a head unit 12 mounted 
within a garage 14. More specifically, the head unit 12 
is mounted to a ceiling 15 of the garage 14. The 
operator 10 includes a transmission 18 extending from the 
head unit 12 with a releasable trolley 20 attached. The 
releasable trolley 20 releasably connects an arm 22 
extending to a single panel garage door 24 positioned for 
movement along a pair of door rails 26 and 28. 

The system 8 includes a hand-held RF transmitter 
unit 30 adapted to send signals to an antenna 32 (see 
Fig. 4) positioned on the head unit 12 and coupled to. a 
receiver within the head unit 12 as will appear 
hereinafter. A switch module 39 is mounted on the head 
unit 12. Switch module 39 includes switches for each of 
the commands available from a remote transmitter or from 
an optional wall-mounted switch (not shown) . Switch 
module 39 enables an installer to conveniently request 
the various learn modes during installation of the head 
unit 12. The switch module 39 includes a learn switch, a 
light switch, a lock switch and a command switch, which 
are described below. Switch module 39 may also include 
terminals for wiring a pedestrian door state sensor 
comprising a pair of contacts 13 and 15 for a pedestrian 
door 11, as well as wiring for an optional wall switch 
(not shown) . 

The garage door 24 includes the pedestrian door 11. 
Contact 13 is mounted to door 24 for contact with contact 
15 mounted to pedestrian door 11. Both contacts 13 and 
15 are connected via a wire 17 to head unit 12. As will 
be described further below, when the pedestrian door 11 
is closed, electrical contact is made between the 
contacts 13 and 15 closing a pedestrian door circuit in 
the receiver in head unit 12 and signalling that the 
pedestriam door state is closed. This circuit must be 
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closed before the receiver will permit other portions of 
the operator to move the door 24. If circuit is open, 
indicating that the pedestrian door state is open, the 
system will not permit door 24 to move. 

The head unit 12 includes a housing comprising four 
sections: a bottom section 102, a front section 106, a 
back section 108 and a top section 110, which are held 
together by screws 112 as shown in Fig. 2. Cover 104 
fits into front section 106 and provides a cover for a 
worklight. External AC power is supplied to the operator 
10 through a power cord 112. The AC power is applied to 
a step-down transformer 120. An electric motor 118 is 
selectively energized by rectified AC power and drives a 
sprocket 125 in -sprocket assembly 124. The sprocket 125 
drives chain 144 (see Fig. 3) . A printed circuit board 
114 includes a controller 200 and other electronics for 
operating the head unit 12. A cable 116 provides input 
and output connections on signal paths between the 
printed circuit board 114 and switch module 39. The 
transmission 18, as shown in Fig. 3, includes a rail 142 
which holds chain 144 within a rail and chain housing 140 
and holds the chain in tension to transfer mechanical 
energy from the motor to the door. 

A block diagram of the controller and motor 
connections is shown in Fig. 4. Controller 200 includes 
an RF receiver 80, a microprocessor 300 and an EEPROM 
302. RF receiver 80 of controller 200 receives a command 
to move the door and actuate the motor either from remote 
transmitter 30, which transmits an RF signal which is 
received by antenna 32, or from a user command switch 
250. User command switch 250 can be a switch on switch 
panel 39, mounted on the head unit, or a switch from an 
optional wall switch. Upon receipt of a door movement 
command signal from either antenna 32 or user switch 250, 
the controller 200 sends a power enable signal via line 
240 to AC hot connection 206 which provides AC line 
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current to transformer 212 and power to work light 210. 
Rectified AC is provided from rectifier 214 via line 236 
to relays 232 and 234. Depending on the commanded 
direction of travel, controller 200 provides a signal to 
either relay 232 or relay 234. Relays 232 and 234 are 
used to control the direction of rotation of motor 118 by 
controlling the direction of current flow through the 
windings. One relay is used for clockwise rotation; the 
other is used for counterclockwise rotation. 

Upon receipt of the door movement command signal, 
controller 200 sends a signal via line 230 to power- 
control FET 252. Motor speed is determined by the 
duration or length of the pulses in the signal to a gate 
electrode of FET 252. The shorter the pulses, the slower 
the speed. This completes the circuit between relay 232 
and FET 252 providing power to motor 118 via line 254. 
If the door had been commanded to move in the opposite 
direction, relay 234 would have been enabled, completing 
the circuit with FET 252 and providing power to motor 118 
via line 238. 

With power provided, the motor 118 drives the output 
shaft 216 which provides drive power to transmission 
sprocket 125. Gear reduction housing 260 includes an 
internal pass point system which sends a pass point 
signal via line 220 to controller 220 whenever the pass 
point is reached. The pass point signal is provided to 
controller 200 via current limiting resistor 226 to 
protect controller 200 from electrostatic discharge 
(ESD) . An RPM interrupt signal is provided via line 224, 
via current limiting resistor 228, to controller 200. 
Lead 222 provides a plus five volts supply for the Hall 
effect sensors in the RPM module. Commanded force is 
input by two force potentiometers 202, 204. Force 
potentiometer 202 is used to set the commanded force for 
UP travel; force potentiometer 204 is used to set the 
commanded force for DOWN travel. Force potentiometers 
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202 and 204 provide commanded inputs to controller 200 
which are used to adjust the length of "the pulsed signal 
provided to FET 252. 

The pass point for this system is provided 
internally in the motor 118. Referring to Fig. 22, the 
pass point module 40 is attached to gear reduction 
housing 260 of motor 118. Pass point module 40 includes 
upper plate 42 which covers the three internal gears and 
switch within lower housing 50. Lower housing 50 
includes recess 62 having two pins 61 which position 
switch assembly 52 in recess 62. Housing 50 also 
includes three cutouts which are sized to support and 
provide for rotation of the three geared elements. Outer 
gear 44 fits rotatably within cutout 64. Outer gear 
includes a smooth outer surface for rotating within 
housing 50 and inner gear teeth for rotating middle gear 
46. Middle gear 46 fits rotatably within inner cutout 
66. Middle gear 46 includes a smooth outer surface and a 
raised portion with gear teeth for being driven by the 
gear teeth of outer ring gear 44. Inner gear 48 fits 
within middle gear 46 and is driven by an extension of 
shaft 216. Rotation of the motor 118 causes shaft 216 to 
rotate and drive inner gear 48. 

Outer gear 44 includes a notch 74 in the outer 
periphery. Middle gear includes a notch 76 in the outer 
periphery. Referring to Fig. 22A, rotation of inner gear 
48 rotates middle gear 46 in the same direction. 
Rotation of middle gear 46 rotates outer gear 44 in the 
same direction. Gears 46 and 44 are sized such that pass 
point indications comprising switch release cutouts 74 
and 7 6 line up only once during the entire travel 
distance of the door. As seen in Fig. 22A, when switch 
release cutouts 74 and 76 line up, switch 72 is open 
generating a pass point presence signal. The location 
where switch release cutouts 74 and 76 line up is the 
pass point. At all other times, at least one of the two 



gears holds switch 72 closed generating a signal 
indicating that the pass point has not -been reached. 

The receiver portion 80 of controller 200 is shown 
in Fig. 5A. RF signals may be received by the controller 
200 at the antenna 32 and fed to the receiver 80. The 
receiver 80 includes variable inductor Ll and a pair of 
capacitors C2 and C3 that provide impedance matching 
between the antenna 32 and other portions of the 
receiver. An NPN transistor Q4 is connected in common- 
base configuration as a buffer amplifier. Bias to the 
buffer amplifier transistor Q4 is provided by resistors 
R2, R3 . The buffered RF output signal is supplied to a 
second NPN transistor Q5 . The radio frequency signal, is 
coupled to a bandpass amplifier 280 to an average 
detector 282 which feeds a comparator 284. Referring to 
Figs. 5C and 5B, the analog output signal A, B is applied 
to noise reduction capacitors C19, C20 and C21 then 
provided to pins P32 and P33 of the microcontroller 300. 
Microcontroller 300 may be a Z86733 microprocessor. 

An external transformer 212 receives AC power from a 
source such as a utility and steps down the AC voltage to 
the power supply 90 circuit of controller 200. 
Transformer 212 provides AC current to full-wave bridge 
circuit 214, which produces a 28 volt full wave rectified 
signal across capacitor C35. The AC power may have a 
frequency of 50 Hz or 60 Hz. An external transformer is 
especially important when motor 118 is a DC motor. The 
28 volt rectified signal is used to drive a wall control 
switch, a obstacle detector circuit, a door-in-door 
switch and to power FETs Qll and Q12 used to start the 
motor. Zener diode D18 protects against overvoltage due 
to the pulsed current, in particular, from the FETs 
rapidly switching off inductive load of the motor. The 
potential of the full-wave rectified signal is further 
reduced to provide 5 volts at capacitor C38, which is 



used to power the microprocessor 300, the receiver 
circuit 80 and other logic functions. 

The 28 volt rectified power supply signal indicated 
by reference numeral T in Fig. 5C is voltage divided down 
by resistors R61 and R62, then applied to an input pin 
P24 of microprocessor 300. This signal is used to 
provide the phase of the power line current to 
microprocessor 300. Microprocessor 300 constantly checks 
for the phase of the line voltage in order to determine 
if the frequency of the line voltage is 50 Hz or 60 Hz. 
This information is used to establish the worklight time- 
out period and to select the look-up table stored in the 
ROM in the microcontroller for converting pulse width_ to 
door speed. 

When the door is commanded to move, either through a 
signal from a remote transmitter received through antenna 
32 and processed by receiver 80, or through an optional 
wall switch, the microprocessor 300 commands the work 
light to turn on. Microprocessor 300 sends a worklight 
enable signal from pin P07. The worklight enable signal 
is applied to the base of transistor Q3, which drives 
relay K3 . AC power from a signal U provides power for 
operating the worklight 210. 

Microprocessor 300 reads from and writes data to an 
EEPROM 302 via its pins P25, P26 and P27 . EE PROM 302 may 
be a 93C46. Microprocessor 300 provides a light enable 
signal at pin P21 which is used to enable a learn mode 
indicator yellow LED D15. LED D15 is enabled or lit when 
the receiver is in the learn mode. Pin P26 provides 
double duty. When the user selects switch SI, a learn 
enable signal is provided to both microprocessor 300 and 
EEPROM 302. Switch Si is mounted on the head unit 12 and 
is part of switch module 39, which is used by the 
installer to operate the system. 

An optional flasher module provides an additional 
level of safety for users and is controlled by 
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microprocessor 300 at pin P22. The optional flasher 
module is connected between terminals 308 and 310. In 
the optional flasher module, after receipt of a door 
command, the microprocessor 300 sends a signal from P22 
which causes the flasher light to blink for 2 seconds. 
The door does not move during that 2 second period, 
giving the user notice that the door has been commanded 
to move and will start to move in 2 seconds. After 
expiration of the 2 second period, the door moves and the 
flasher light module blinks during the entire period of 
door movement. If the operator does not have a flasher 
module installed in the head unit, when the door is 
commanded to move, there is no time delay before the door 
begins to move. 

Microprocessor 300 provides the signals which start 
motor 116, control its direction of rotation (and thus 
the direction of movement of the door) and the speed of 
rotation (speed of door travel) . FETs Qll and Q12 are 
used to start motor 118. Microprocessor 300 applies. a 
pulsed output signal to the gates of FETs Qll and Q12 . 
The lengths of the pulses determine the time the FETs 
conduct and thus the amount of time current is applied to 
start and run the motor 118. The longer the pulse, the 
longer current is applied, the greater the speed of 
rotation the motor 118 will develop. Diode Dll is 
coupled between the 28 volt power supply and is used to 
clean up flyback voltage to the input bridge D4 when the 
FETs are conducting. Similarly, Zener diode D19 (see 
Fig. 5A) is used to protect against overvoltage when the 
FETs are conducting. 

Control of the direction of rotation of motor 118 
(and thus direction of travel of the door) is 
accomplished with two relays, Kl and K2 . Relay Kl 
supplies current to cause the motor to rotate clockwise 
in an opening direction (door moves UP) ; relay K2 
supplies current to cause the motor to rotate 



counterclockwise in a closing direction (door moves 
DOWN) . When the door is commanded to move UP, the 
microprocessor 300 sends an enable signal from pin P05 to 
the base of transistor Ql, which drives relay Kl . When 
5 the door is commanded to move DOWN, the microprocessor 
300 sends an enable signal from pin P06 to the base of 
transistor Q2, which drives relay K2 . 

Door-in-door contacts 13 and 15 are connected to 
terminals 304 and 306. Terminals 304 and 306 are 
10 connected to relays Kl and K2 . If the signal between 

contacts 13 and 15 is broken, the signal across terminals 
304 and 306 is open, preventing relays Kl and K2 from 
energizing. The motor 118 will not rotate and the dopr 
24 will not move until the user closes pedestrian door 
15 11, making contact between contacts 13 and 15. 

The pass point signal 220 from the pass point module 
40 (see Fig. 21) of motor 118 is applied to pin P23 of 
microprocessor 300. The RPM signal 224 from the RPM 
sensor module in motor 118 is applied to pin P31 of 
20 microprocessor 300. Application of the pass point signal 
and the RPM signal is described with reference to the 
flow charts. 

An optional wall control, which duplicates the 
switches on remote transmitter 30, may be connected to 
25 controller 200 at terminals 312 and 314. When the user 
presses the door command switch 39, a dead short is made 
to ground, which the microprocessor 300 detects by the 
failure to detect voltage. Capacitor C22 is provided for 
RF noise reduction. The dead short to ground is sensed 
30 at pins P02 and P03, for redundancy. 

Switches Si and S2 are part of switch module 39 
mounted on head unit 12 and used by the installer for 
operating the system. As stated above, SI is the learn 
switch. S2 is the door command switch. When S2 is 
35 pressed, microprocessor 300 detects the dead short at 
pins P02 and P03. 
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Input from an obstacle detector (not shown) is 
provided at terminal 316. This signal is voltage divided 
down and provided to microprocessor 300 at pins P20 and 
P30, for redundancy. Except when the door is moving and 
less than an inch above the floor, when the obstacle 
detector senses an object in the doorway, the 
microprocessor executes the auto-reverse routine causing 
the door to stop and/or reverse depending on the state of 
the door movement . 

Force and speed of door travel are determined by two 
potentiometers. Potentiometer R33 adjusts the force and 
speed of UP travel; potentiometer R34 adjusts the force 
and speed of DOWN travel. Potentiometers R33 and R34, act 
as analog voltage dividers. The analog signal from R33, 
R34 is further divided down by voltage divider R35/R37, 
R36/R38 before it is applied to the input of comparators 
320 and 322. Reference pulses from pins P34 and P35 of 
microprocessor 300 are compared with the force input from 
potentiometers R33 and R34 in comparators 320 and 322. 
The output of comparators 320 and 322 is applied to pins 
P01 and POO. 

To perform the A/D conversion, the microprocessor 
300 samples the output of the comparators 320 and 322 at 
pins POO and P01 to determine which voltage is higher: 
the voltage from the potentiometer R33 or R34 (IN) or the 
voltage from the reference pin P34 or P35 (REF) . If the 
potentiometer voltage is higher than the reference, then 
the microprocessor outputs a pulse. If not, the output 
voltage is held low. The RC filter (R39, C29/R40, C30) 
converts the pulses into a DC voltage equivalent to the 
duty cycle of the pulses. By outputting the pulses in 
the manner described above, the microprocessor creates a 
voltage at REF which dithers around the voltage at IN. 
The microprocessor then calculates the duty cycle of the 
pulse output which directly correlates to the voltage 
seen at IN. 



When power is applied to the head unit 12 including 
controller 200, microprocessor 300 executes a series of 
routines. With power applied, microprocessor 300 
executes the main routines shown in Figs. 6A and 6B. The 
main loop 400 includes three basic functions, which are 
looped continuously until power is removed. In block 402 
the microprocessor 300 handles all non-radio EE PROM 
communications and disables radio access to the EEPROM 
302 when communicating. This ensures that during normal 
operation, i.e., when the garage door operator is not 
being programmed, the remote transmitter does not have 
access to the EEPROM, where transmitter codes are stored. 
Radio transmissions are processed upon receipt of a radio 
interrupt (see below) . 

In block 404, microprocessor 300 maintains all low 
priority tasks, such as calculating new force levels and 
minimum speed. Preferably, a set of redundant RAM 
registers is provided. In the event of an unforeseen 
event (e.g., an ESD event) which corrupts regular RAM, 
the main RAM registers and the redundant RAM registers 
will not match. Thus, when the values in RAM do not 
match, the routine knows the regular RAM has been 
corrupted. (See block 504 below.) In block 406, 
microprocessor 300 tests redundant RAM registers. 
Several interrupt routines can take priority over blocks 
402, 404 and 406. 

The infrared obstacle detector generates an 
asynchronous IR interrupt signal which is a series of 
pulses. The absence of the obstacle detector pulses 
indicates an obstruction in the beam. After processing 
the IR interrupt, microprocessor 300 sets the status of 
the obstacle detector as unobstructed at block 416. 

Receipt of a transmission from remote transmitter 30 
generates an asynchronous radio interrupt at block 410. 
At block 418, if in the door command mode, microprocessor 
300 parses incoming radio signals and sets a flag if the 
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signal matches a stored code. If in the learn mode, 
microprocessor 300 stores the new transmitter codes in 
the EE PROM . 

An asynchronous interrupt is generated if a remote 
5 communications unit is connected to an optional RS-232 
communications port located on the head unit. Upon 
receipt of the hardware interrupt, microprocessor 300 
executes a serial data communications routine for 
transferring and storing data from the remote hardware. 

10 Hardware timer 0 interrupt is shown in block 422. 

In block 422, microprocessor 300 reads the incoming AC 
line signal from pin P24 and handles the motor phase 
control output. The incoming line signal is used to 
determine if the line voltage is 50 Hz for the foreign 

15 market or 60 Hz for the domestic market. With each 
interrupt, microprocessor 300, at block 426, task 
switches among three tasks. In block 428, microprocessor 
300 updates software timers. In block 430, 
microprocessor 300 debounces wall control switch signals. 

20 In block 432, microprocessor 300 controls the motor 

state, including motor direction relay outputs and motor 
safety systems. 

When the motor 118 is running, it generates an 
asynchronous RPM interrupt at block 434. When 

25 microprocessor 300 receives the asynchronous RPM 

interrupt at pin P31, it calculates the motor RPM period 
at block 436, then updates the position of the door at 
block 438. 

Further details of main loop 400 are shown in Figs. 

30 7A through 7H. The first step executed in main loop 400 
is block 450, where the microprocessor checks to see if 
the pass point has been passed since the last update. If 
it has, the routine branches to block 452, where the 
microprocessor 300 updates the position of the door 

35 relative to the pass point in EEPROM 302 or non-volatile 
memory. The routine then continues at block 454. An 
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optional safety feature of the garage door operator 
system enables the worklight, when the -door is open and 
stopped and the infrared beam in the obstacle detector is 
broken . 

At block 454, the microprocessor checks if the 
enable/disable of the worklight for this feature has been 
changed. Some users want the added safety feature; 
others prefer to save the electricity used. If new input 
has been provided, the routine branches to block 456 and 
sets the status of the obstacle detector-controlled 
worklight in non-volatile memory in accordance with the 
new input. Then the routine continues to block 458 where 
the routine checks to determine if the worklight has been 
turned on without the timer. A separate switch is 
provided on both the remote transmitter 30 and the head 
unit at module 39 to enable the user to switch on the 
worklight without operating the door command switch. If 
no, the routine skips to block 470. 

If yes, the routine checks at block 460 to see if 
the one-shot flag has been set for an obstacle detector 
beam break. If no, the routine skips to block 470.. If 
yes, the routine checks if the obstacle detector 
controlled worklight is enabled at block 462. If not, 
the routine skips to block 470. If it is, the routine 
checks if the door is stopped in the fully open position 
at block 464. If no, the routine skips to block 470. If 
yes, the routine calls the SetVarLight subroutine (see 
Fig. 8) to enable the appropriate turn off time (4.5 
minutes for 60 Hz systems or 2.5 minutes for 50 Hz 
systems) . At block 468, the routine turns on the 
worklight . 

At block 470, the microprocessor 300 clears the one- 
shot flag for the infrared beam break. This resets the 

obstacle detector, so that a later beam break can 
generate an interrupt. At block 472, if the user has 
installed a temporary password usable for a fixed period 
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of time, the microprocessor 300 updates the non-volatile 
timer for the radio temporary password.' At block 474, 
the microprocessor 300 refreshes the RAM registers for 
radio mode from non- volatile memory (EE PROM 302) . At 
5 block 476, the microprocessor 300 refreshes I/O port 
directions, i.e., whether each of the ports is to be 
input or output. At block 478, the microprocessor 300 
updates the status of the radio lockout flag, if 
necessary. The radio lockout flag prevents the 
10 microprocessor from responding to a signal from a remote 
transmitter. A radio interrupt (described below) will 
disable the radio lockout flag and enable the remote 
transmitter to communicate with the receiver. 

At block 480, the microprocessor 300 checks if the 
15 door is about to travel. If not, the routine skips to 
block 502. If the door is about to travel, the 
microprocessor 300 checks if the limits are being trained 
at block 482. If they are, the routine skips to block 
502. If not, the routine asks at block 484 if travel is 
2 0 UP or DOWN. If DOWN, the routine refreshes the DOWN 

limit from non-volatile memory (EEPROM 302) at block 486. 
If UP, the routine refreshes the UP limit from non- 
volatile memory (EEPROM 302) at block 488. The routine 
updates the current operating state and position relative 
25 to the pass point in non-volatile memory at block 490. 
This is a redundant read for stability of the system. 

At block 492, the routine checks for completion of a 
limit training cycle. If training is complete, the 
routine branches to block 494 where the new limit 
30 settings and position relative to the pass point are 
written to non-volatile memory. 

The routine then updates the counter for the number 
of operating cycles at block 496. This information can 
be downloaded at a later time and used to determine when 
35 certain parts need to be replaced. At block 498 the 

routine checks if the number of cycles is a multiple of 



256. Limiting the storage of this information to 
multiples of 256 limits the number of times the system 
has to write to that register. If yes it updates the 
history of force settings at block 500. If not, the 
routine continues to block 502. 

At block 502 the routine updates the learn switch 
debouncer. At block 504 the routine performs a 
continuity check by comparing the backup (redundant) RAM 
registers with the main registers. If they do not match, 
the routine branches to block 506. If the registers do 
not match, the RAM memory has been corrupted and the 
system is not safe to operate, so a reset is commanded. 
At this point, the system powers up as if power had been 
removed and reapplied and the first step is a self test 
of the system (all installation settings are unchanged) . 

If the answer to block 504 is yes, the routine 
continues to block 508 where the routine services any 
incoming serial messages from the optional wall control 
(serial messages might be user input start or stop 
commands) . The routine then loads the UP force timing 
from the ROM look-up table, using the user setting as an 
index at block 510. Force potentiometers R33 and R34 are 
set by the user. The analog values set by the user are 
converted to digital values. The digital values are used 
as an index to the look-up table stored in memory. The 
value indexed from the look-up table is then used as the 
minimum motor speed measurement. When the motor runs, 
the routine compares the selected value from the look-up 
table with the digital timing from the RPM routine to 
ensure the force is acceptable. 

Instead of calculating the force each time the force 
potentiometers are set, a look-up table is provided for 
each potentiometer. The range of values based on the 
range of user inputs is stored in ROM and used to save 
microprocessor processing time. The system includes two 
force limits: one for the UP force and one for the DOWN 



force. Two force limits provide a safer system. A heavy 
door may require more UP force to lift, but need a lower 
DOWN force setting (and therefore a slower closing speed) 
to provide a soft closure. A light door will need less 
UP force to open the door and possibly a greater DOWN 
force to provide a full closure. 

Next the force timing is divided by power level of 
the motor for the door to scale the maximum force timeout 
at block 512. This step scales the force reversal point 
based on the maximum force for the door. The maximum 
force for the door is determined based on the size of the 
door, i.e. the distance the door travels. Single piece 
doors travel a greater distance than segmented doors.. 
Short doors require less force to move than normal doors. 
The maximum force for a short door is scaled down to 60 
percent of the maximum force available for a normal door. 
So, at block 512, if the force setting is set by the 
user, for example at 40 percent, and the door is a normal 
door (i.e., a segmented door or multi-paneled door), the 
force is scaled to 40 percent of 100 percent. If the 
door is a short door (i.e., a single panel door), the 
force is scaled to 40 percent of 60 percent, or 24 
percent . 

At block 514, the routine loads the DOWN force 
timing from the ROM look-up table, using the user setting 
as an index. At block 516, the routine divides the force 
timing by the power level of the motor for the door to 
scale the force to the speed. 

At block 518 the routine checks if the door is 
traveling DOWN. If yes, the routine disables use of the 
MinSpeed Register at block 524 and loads the MinSpeed 
Register with the DOWN force setting, i.e., the value 
read from the DOWN force potentiometer at block 526. If 
not, the routine disables use of the MinSpeed Register at 
block 520 and loads the MinSpeed Register with the UP 
force setting from the force potentiometer at block 522. 
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The routine continues at block 528 where the routine 
subtracts 20 from the MinSpeed value. -The MinSpeed value 
ranges from 0 to 63. The system uses 64 levels of force. 
If the result is negative at block 530, the routine 
clears the MinSpeed Register at block 532 to effectively 
truncate the lower 38 percent of the force settings. If 
no, the routine divides the minimum speed by 4 to scale 8 
speeds to 32 force settings at block 534. At block 536, 
the routine adds 4 into the minimum speed to correct the 
offset, and clips the result to a maximum of 12. At 
block 538 the routine enables use of the MinSpeed 
Register . 

At block 540 the routine checks if the period of. the 
rectified AC line signal (input to microprocessor 300 at 
pin P24) is less than 9 milliseconds (indicating the line 
frequency is 60 Hz) . If it is, the routine skips to 
block 548. If not, the routine checks if the light shut- 
off timer is active at block 542. If not, the routine 
skips to block 548. If yes, the routine checks if the 
light time value is greater than 2.5 minutes at block 
544. If no, the routine skips to block 548. If yes, the 
routine calls the SetVarLight subroutine (see Fig. 8), to 
correct the light timing setting, at block 546. 

At block 548 the routine checks if the radio signal 
has been clear for 100 milliseconds or more. If not, the 
routine skips to block 552. If yes, the routine clears 
the radio at block 550. At block 552, the routine resets 
the watchdog timer. At block 554, the routine loops to 
the beginning of the main loop. 

The SetVarLight subroutine, Fig. 8, is called 
whenever the door is commanded to move and the worklight 
is to be turned on. When the SetVarLight subroutine, 
block 558 is called, the subroutine checks if the period 
of the rectified power line signal (pin P24 of 
microprocessor 300) is greater than or equal to 9 
milliseconds. If yes, the line frequency is 50 Hz, and 
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the timer is set to 2.5 minutes at block 564. If no, the 
line frequency is 60 Hz and the timer i-s set to 4.5 
minutes at block 562. After setting, the subroutine 
returns to the call point at block 566. 
5 The hardware timer interrupt subroutine operated by 

microprocessor 300, shown at block 422, runs every 0.256 
milliseconds. Referring to Figs. 9A-9C, when the 
subroutine is first called, it sets the radio interrupt 
status as indicated by the software flags at block 580. 

10 At block 582, the subroutine updates the software timer 

extension. The next series of steps monitor the AC power 
line frequency (pin P24 of microprocessor 300) . At step 
584, the subroutine checks if the rectified power line 
input is high (checks for a leading edge) . If yes, the 

15 subroutine skips to block 594, where it increments the 
power line high time counter, then continues to block 
596. If no, the subroutine checks if the high time 
counter is below 2 milliseconds at block 586. If yes, 
the subroutine skips to block 594. If no, the subroutine 

20 sets the measured power line time in RAM at block 588. 
The subroutine then resets the power line high time 
counter at block 590 and resets the phase timer register 
in block 592 . 

At block 596, the subroutine checks if the motor 

25 power level is set at 100 percent. If yes, the 

subroutine turns on the motor phase control output at 
block 606. If no, the subroutine checks if the motor 
power level is set at 0 percent at block 598. If yes, 
the subroutine turns off the motor phase control output 

30 at block 604. If no, the phase timer register is 

decremented at block 600 and the result is checked for 
sign. If positive the subroutine branches to block 606; 
if negative the subroutine branches to block 604. 

The subroutine continues at block 608 where the 

35 incoming RPM signal (at pin P31 of microprocessor 300) is 
digitally filtered. Then the time prescaling task 
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switcher (which loops through 8 tasks identified at 
blocks 620, 630, 640, 650) is incremented at block 610. 
The task switcher varies from 0 to 7 . At block 612, the 
subroutine branches to the proper task depending on the 
value of the task switcher. 

If the task switcher is at value 2 (this occurs 
every 4 milliseconds), the execute motor state machine 
subroutine is called at block 620. If the task is value 
0 or 4 (this occurs every 2 milliseconds), the wall 
control switches are debounced at block 630. If the task 
value is 6 (this occurs every 4 milliseconds) , the 
execute 4 ms timer subroutine is called at block 640. If 
the task is value 1, 3, 5 or 7, the 1 millisecond timer 
subroutine is called at block 650. Upon completion of 
the called subroutine, the 0.256 millisecond timer 
subroutine returns at block 614. 

Details of the 1 ms timer subroutine (block 650) are 
shown in Figs. 1 OA- IOC. When this subroutine is called, 
the first step is to update the A/D converters on the UP ■ 
and DOWN force setting potentiometers (P34 and P35 of 
microprocessor 300) at block 652. At block 654, the 
subroutine checks if the A/D conversion (comparison at 
comparators 320 and 322) is complete. If yes, 
the measured potentiometer values are stored at block 
656. Then the stored values (which vary from 0 to 127) 
are divided by 2 to obtain the 64 level force setting at 
block 658. If no, the subroutine decrements the infrared 
obstacle detector timeout timer at block 660. In block 
662, the subroutine checks if the timer has reached zero. 
If no, the subroutine skips to block 672. If yes, the 
subroutine resets the infrared obstacle detector timeout 
timer at block 664. The flag setting for the obstacle 
detector signal is checked at block 666. If no, the one- 
shot break flag is set at block 668. If yes, the flag is 
set indicating the obstacle detector signal is absent at 
block 670. 
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At block 672, the subroutine increments the radio 
time out register. Then the infrared obstacle detector 
reversal timer is decremented at block 674. The pass 
point input is debounced at block 676. The 125 
millisecond prescaler is incremented at block 678. Then 
the prescaler is checked if it has reached 63 
milliseconds at block 680. If yes, the fault blinking 
LED is updated at block 682. If no, the prescaler is 
checked if it has reached 125 ms at block 684. If yes, 
the 125 ms timer subroutine is executed at block 686. If 
no, the routine returns at block 688. 

The 125 millisecond timer subroutine (block 690) is 
used to manage the power level of the motor 118. At . 
block 692, the subroutine updates the RS-232 mode timer 
and exits the RS-232 mode timer if necessary. The same 
pair of wires is used for both wall control switches and 
RS-232 communication. If RS-232 communication is 
received while in the wall control mode, the RS-232 mode 
is entered. If four seconds passes since the last RS-232 
word was received, then the RS-232 timer times out and 
reverts to the wall control mode. At block 694 the 
subroutine checks if the motor is set to be stopped. If 
yes, the subroutine skips to block 716 and sets the 
motor's power level to 0 percent. If no, the subroutine 
checks if the pre-travel safety light is flashing at 
block 696 (if the optional flasher module has been 
installed, a light will flash for 2 seconds before the 
motor is permitted to travel and then flash at a 
predetermined interval during motor travel) . If yes, the 
subroutine skips to block 716 and sets the motor's power 
level to 0 percent. 

If no, the subroutine checks if the microprocessor 
300 is in the last phase of a limit training mode at 
block 698. If yes, the subroutine skips to block 710. 
If no, the subroutine checks if the microprocessor 300 is 
in another part of the limit training mode at block 700. 
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If no, the subroutine skips to block 710. If yes, the 
subroutine checks if the minimum speed -(as determined by 
the force settings) is greater than 40 percent at block 
704. If no, the power level is set to 40 percent at 
5 block 708. If yes, the power level is set equal to the 
minimum speed stored in MinSpeed Register at block 706. 

At block 710 the subroutine checks if the flag is 
set to slow down. If yes, the subroutine checks if the 
motor is running above or below minimum speed at block 

10 714. If above minimum speed, the power level of the 
motor is decremented one step increment (one step 
increment is preferably 5% of maximum motor speed) at 
block 722. If below the minimum speed, the power level 
of the motor is incremented one step increment (which is 

15 prefe ably 5% of maximum motor speed) to minimum speed at 
block 720. 

If the flag is not set to slow down at block 710, 
the subroutine checks if the motor is running at maximum 
allowable speed at block 712. If no, the power level of 

2 0 the motor is incremented one step increment (which is 

preferably 5% of maximum motor speed) at block 720. If 
yes, the flag is set for motor ramp-up speed complete. 

The subroutine continues at block 724 where it 
checks if the period of the rectified AC power line (pin 

25 P24 of microprocessor 300) is greater than or equal to 9 
ms . If no, the subroutine fetches the motor's phase 
control information (indexed from the power level) from 
the 60 Hz look-up table stored in ROM at block 728. If 
yes, the subroutine fetches the motor's phase control 

30 information {indexed from the power level) from the 50 Hz 
look-up table stored in ROM at block 726. 

The subroutine tests for a user enable/disable of 
the infrared obstacle detector-controlled worklight 
feature at block 730. Then the user radio learning 

35 timers, ZZWIN (at the wall keypad if installed) and 
AUXLEARNSW (radio on air and worklight command) are 



updated at block 732. The software watchdog timer is 
updated at block 734 and the fault blin-king LED is 
updated at block 736. The subroutine returns at block 
738 . 

The 4 millisecond timer subroutine is used to check 
on various systems which do not require updating as often 
as more critical systems. Referring to Figs. 12A and 
12B, the subroutine is called at block 640. At block 
750, the RPM safety timers are updated. These timers are 
used to determine if the door has engaged the floor. The 
RPM safety timer is a one second delay before the 
operator begins to look for a falling door, i.e., one 
second after stopping. There are two different forces 
used in the garage door operator. The first type force 
are the forces determined by the UP and DOWN force 
potentiometers. These force levels determine the speed 
at which the door travels in the UP and DOWN directions. 
The second type of force is determined by the decrease in 
motor speed due to an external force being applied to the 
door (an obstacle or the floor) . This programmed or pre- 
selected external force is the maximum force that the 
system will accept before an auto-reverse or stop is 
commanded . 

At block 752 the 0.5 second RPM timer is checked to 
see if it has expired. ' If yes, the 0.5 second timer is 
reset at block 754. At block 756 safety checks are 
performed on the RPM seen during the last 0.5 seconds to 
prevent the door from falling. The 0.5 second timer is 
chosen so the maximum force achieved at the trolley will 
reach 50 kilograms in 0.5 seconds if the motor is 
operating at 100 percent of power. 

At block 7 58, the subroutine updates the 1 second 
timer for the optional light flasher module. In this 
embodiment, the preferred flash period is 1 second. At 
block 760 the radio dead time and dropout timers are 
updated. At block 7 62 the learn switch is debounced. At 
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block 764 the status of the worklight is updated in 
accordance with the various light timers. At block 766 
the optional wall control blink timer is updated. The 
optional wall control includes a light which blinks when 
5 the door is being commanded to auto-reverse in response 
to an infrared obstacle detector signal break. At block 
7 68 the subroutine returns. 

Further details of the asynchronous RPM signal 
interrupt, block 434, are shown in Figs. 13A and 13B. 

10 This signal, which is provided to microprocessor 300 at 
pin P31, is used to control the motor speed and the 
position detector. Door position is determined by a 
value relative to the pass point. The pass point is set 
at 0. Positions above the pass point are negative; 

15 positions below the pass point are positive. When the 
door travels to the UP limit, the position detector (or 
counter) determines the position based on the number of 
RPM pulses to the UP limit number. When the door travels 
DOWN to the DOWN limit, the position detector counts the 

20 number of RPM pulses to the DOWN limit number. The UP 
and DOWN limit numbers are stored in a register. 

At block 7 82 the RPM interrupt subroutine calculates 
the period of the incoming RPM signal. If the door is 
traveling UP, the subroutine calculates the difference 

25 between two successive pulses. If the door is traveling 
DOWN, the subroutine calculates the difference between 
two successive pulses. At block 784, the subroutine 
divides the period by 8 to fit into a binary word. At 
block 786 the subroutine checks if the motor speed is 

30 ramping up. This is the max force mode. RPM timeout 

will vary from 10 to 500 milliseconds. Note that these 
times are recommended for a DC motor. If an AC motor is 
used, the maximum time would be scaled down to typically 
24 milliseconds. A 24 millisecond period is slower than 

35 the breakdown RPM of the motor and therefore beyond the 

maximum possible force of most preferred motors. If yes, 
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the RPM timeout is set at 500 milliseconds (0.5 seconds) 
at block 790. If no, the subroutine sets the RPM timeout 
as the rounded-up value of the force setting in block 
788. 

At block 792 the subroutine checks for the direction 
of travel. This is found in the state machine register. 
If the door is traveling DOWN, the position counter is 
incremented at block 796 and the pass point debouncer is 
sampled at block 800. At block 804, the subroutine 
checks for the falling edge of the pass point signal. If 
the falling edge is present, the subroutine returns at 
block 814. If there is a pass point falling edge, the 
subroutine checks for the lowest pass point (in cases, 
where more than one pass point is used) . If this is not 
the lowest pass point, the subroutine returns at block 
814. If it is the only pass point or the lowest pass 
point, the position counter is zeroed and the subroutine 
returns at block 814. 

If the door is traveling UP, the subroutine 
decrements the position counter at block 7 94 and samples 
the pass point debouncer at block 798. Then it checks 
for the rising edge of the pass point signal at block 
802. If there is no pass point signal rising edge, the 
subroutine returns at block 814. If there is, it checks 
for the lowest pass point at block 806. If no the 
subroutine returns at block 814. If yes, the subroutine 
zeroes the position counter and returns at block 814. 

The motor state machine subroutine, block 620, is 
shown in Fig. 14. It keeps track of the state of the 
motor. At block 820, the subroutine updates the false 
obstacle detector signal output, which is used in systems 
that do not require an infrared obstacle detector. At 
block 822, the subroutine checks if the software watchdog 
timer has reached too high a value. If yes, a system 
reset is commanded at block 824. If no, at block 826, it 
checks the state of the motor stored in the motor state 
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register located in EE PROM 302 and executes the 
appropriate subroutine. 

If the door is traveling UP, the UP direction 
subroutine at block 832 is executed. If the door is 
5 traveling DOWN, the DOWN direction subroutine is executed 
at block 828. If the door is stopped in the middle of 
the travel path, the stop in midtravel subroutine is 
executed at block 838. If the door is fully closed, the 
DOWN position subroutine is executed at block 830. If 

10 the door is fully open, the UP position subroutine is 
executed at block 834. If the door is reversing, the 
auto-reverse subroutine is executed at block 836. 

When the door is stopped in midtravel, the 
subroutine at block 838 is called, as shown in Fig. 15. 

15 In block 840 the subroutine updates the relay safety 

system (ensuring that relays Kl and K2 are open) . The 
subroutine checks for a received wall command or radio 
command. If there is no received command, the subroutine 
updates the worklight status and returns. If yes, the 

20 motor power is set to 20 percent at block 844 and the 

motor state is set to traveling DOWN at block 846. • The 
worklight status is updated and the subroutine returns at 
block 850. If the door is stopped in midtravel and a 
door command is received, the door is set to close. The 

25 next time the system calls the motor state machine 

subroutine, the motor state machine will call the DOWN 
direction subroutine. The door must close to the DOWN 
limit before it can be opened to the full UP limit. 

If the state machine indicates the door is in the 

30 DOWN position (i.e. the DOWN limit position), the DOWN 
position subroutine, block 830, at Fig. 16 is called. 
When the door is in the DOWN position, the subroutine 
checks if a wall control or radio command has been 
received. If no, the subroutine updates the light and 

35 returns at block 858. If yes, the motor power is set to 
20 percent at block 854 and the motor state register is 
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set to show the state is traveling UP at block 856. The 
subroutine then updates the light and returns at block 
858. 

The UP direction subroutine, block 832, is shown in 
5 Figs. 17A-17C. At block 860 the subroutine waits until 
the main loop refreshes the UP limit from EE PROM 302. 
Then it checks if 40 milliseconds have passed since 
closing of the light relay K3 at block 862. If not, the 
subroutine returns. If yes, the subroutine checks for 

10 flashing the warning light prior to travel at block 866 
(only if the optional flasher module is installed) . If 
the light is flashing, the status of the blinking light 
is updated and the subroutine returns at block 868. If 
not, the flashing is terminated, the motor UP relay is 

15 turned on at block 870. Then the subroutine waits until 
1 second has passed after the motor was turned on at 
block 872. If no, the subroutine skips to block 888. If 
yes, the subroutine checks for the RPM signal timeout. 
If no, the subroutine checks if the motor speed is 

20 ramping up at block 87 6 by checking the value of the 
RAMP FLAG register in RAM (i.e., UP, DOWN, FULLSPEED, 
STOP) . If yes, the subroutine skips to block 888. If 
no, the subroutine checks if the measured RPM is longer 
than the allowable RPM period at block 878. If no, the 

25 subroutine continues at block 888. 

If the RPM signal has timed out at block 874 or the 
measured time period is longer than allowable at block 
878, the subroutine branches to block 880. At block 880, 
the reason is set as force obstruction. At block 882, if 

30 the training limits are being set, the training status is 
updated. At block 884 the motor power is set to zero and 
the state is set as stopped in midtravel. At block 886 
the subroutine returns. 

At block 888 the subroutine checks if the door's 

35 exact position is known. If it is not, the door's 

distance from the UP limit is updated in block 890 by 
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subtracting the UP limit stored in RAM from the position 
of the door also stored in RAM. Then the subroutine 
checks at block 892 if the door is beyond its UP limit. 
If yes, the subroutine sets the reason as reaching the 
5 limit in block 894. Then the subroutine checks if the ' 
limits are being trained. If yes, the limit training 
machine is updated at block 898. If no, the motor's 
power is set as zero and the motor state is set at the UP 
position in block 900. Then the subroutine returns at 

10 block 902. 

If the door is not beyond its UP limit, the 
subroutine checks if the door is being manually 
positioned in the training cycle at block 904. If not, 
the door position within the slowdown distance of the 

15 limit is checked at block 906. If yes, the motor slow 
down flag is set at block 910. If the door is being 
positioned manually at block 904 or the door is not 
within the slow down distance, the subroutine skips to 
block 912. At block 912 'the subroutine checks if a wall 

20 control or radio command has been received. If yes, the 
motor power is set at zero and the state is set at 
stopped in midtravel at block 916. If no, the system 
checks if the motor has been running for over 27 seconds 
at block 914. If yes, the motor power is set at zero and 

25 the motor state is set at stopped in midtravel at block 
916. Then the subroutine returns at block 918. 

Referring to Fig. 18, the auto-reverse subroutine 
block 836 is described. (Force reversal is stopping the 
motor for 0.5 seconds, then traveling UP.) At block 920 

30 the subroutine updates the 0.5 second reversal timer (the 
force reversal timer described above) . Then the 
subroutine checks at block 922 for expiration of the 
force-reversal timer. If yes, the motor power is set to 
20 percent at block 924 and the motor state is set to 

35 traveling UP at block 926 and the subroutine returns at 
block 932. If the timer has not expired, the subroutine 
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checks for receipt of a wall command or radio command at 
block 928. If yes, the motor power is set to zero and 
the state is set at stopped in midtravel at block 930, 
then the subroutine returns at block 932. If no, the 
subroutine returns at block 932. 

The UP position routine, block 834, is shown in Fig. 
19. Door travel limits training is started with the door 
in the UP position. At block 934, the subroutine updates 
the relay safety system. Then the subroutine checks for 
receipt of a wall command or radio command at block 936 
indicating an intervening user command. If yes, the 
motor power is set to 20 percent at block 938 and the 
state is set at traveling DOWN in block 940. Then the 
light is updated and the subroutine returns at block 950. 
If no wall command has been received, the subroutine 
checks for training the limits at block 942. If no, the 
light is updated and the subroutine returns at block 950. 
If yes, the limit training state machine is updated at 
block 944. Then the subroutine checks if it is time to 
travel DOWN at block 94 6. If no, the subroutine updates 
the light and returns at block 950. If it is time to 
travel DOWN, the state is set at traveling DOWN at block 
948 and the system returns at block 950. 

The DOWN direction subroutine, block 828, is shown 
in Figs. 20A-20D. At block 952, the subroutine waits 
until the main loop routine refreshes the DOWN limit from 
EEPROM 302. For safety purposes, only the main loop or 
the remote transmitter (radio) can access data stored in 
or written to the EEPROM 302. Because EEPROM 
communication is handled within software, it is necessary 
to ensure that two software routines do not try to 
communicate with the EEPROM at the same time (and have a 
data collision) . Therefore, EEPROM communication is 
allowed only in the Main Loop and in the Radio routine, 
with the Main loop having a busy flag to prevent the 
radio from communicating with the EEPROM at the same 
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time. At block 954, the subroutine checks if 40 
milliseconds has passed since closing o-f the light relay 
K3. If no, the subroutine returns at block 956. If yes, 
the subroutine checks if the warning light is flashing 
5 (for 2 seconds if the optional flasher module is 

installed) prior to travel at block 958. If yes, the 
subroutine updates the status of the flashing light and 
returns at block 960. If no, or the flashing is 
completed, the subroutine turns on the DOWN motor relay 

10 K2 at block 962. At block 964 the subroutine checks if 

one second has passed since the motor is first turned on. 
The system ignores the force on the motor for the first 
one second. This allows the motor time to overcome the 
inertia of the door (and exceed the programmed force 

15 settings) without having to adjust the programmed force 

settings for ramp up, normal travel and slow down. Force 
is effectively set to maximum during ramp up to overcome 
sticky doors. 

If the one second time has not passed, the 

20 subroutine skips to block 984. If the one second time 
limit has passed, the subroutine checks for the RPM 
signal time out at block 966. If no, the subroutine 
checks if the motor speed is currently being ramped up at 
block 968 (this is a maximum force condition) . If yes, 

25 the routine skips to block 984. If no, the subroutine 
checks if the measured RPM period is longer than the 
allowable RPM period. If no, the subroutine continues at 
block 984. 

If either the RPM signal has timed out (block 966) 
30 or the RPM period is longer than allowable (block 970), 
this is an indication of an obstruction or the door has 
reached the DOWN limit position, and the subroutine skips 
to block 972. At block 972, the subroutine checks if the 
door is positioned beyond the DOWN limit setting. If it 
35 is, the subroutine skips to block 990 where it checks if 
the motor has been powered for at least one second. This 
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one second power period after the DOWN limit has been 
reached provides for the door to close -fully against the 
floor. This is especially important when DC motors are 
used. The one second period overcomes the internal 
5 braking effect of the DC motor on shut-off. Auto-reverse 
is disabled after the position detector reaches the DOWN 
limit . 

If the motor has been running for one second, at 
block 990, the subroutine sets the reason as reaching the 

10 limit at block 994. The subroutine then checks if the 

limits are being trained at block 998. If yes, the limit 
training machine is updated at block 1002. If no, the 
motor's power is set to zero and the motor state is set 
at the DOWN position in block 1006. In block 1008 the 

15 subroutine returns. 

If the motor has not been running for at least one 
second at block 990, the subroutine sets the reason as 
early limit at block 1026. Then the subroutine sets the 
motor power at zero and the motor state as auto-reverse 

20 at block 1028 and returns at block 1030. 

Returning to block 984, the subroutine checks if the 
door's position is currently unknown. If yes, the 
subroutine skips to block 1004. If no, the subroutine 
updates the door's distance from the DOWN limit using 

25 internal RAM in microprocessor 300 in block 986. Then 
the subroutine checks at block 988 if the door is three 
inches beyond the DOWN limit. If yes, the subroutine 
skips to block 990. If no, the subroutine checks if the 
door is being positioned manually in the training cycle 

30 at block 992. If yes, the subroutine skips to block 

1004. If no, the subroutine checks if the door is within 
the slow DOWN distance of the limit at block 996. If no, 
the subroutine skips to block 1004. If yes, the 
subroutine sets the motor slow down flag at block 1000. 

35 At block 1004, the subroutine checks if a wall 

control command or radio command has been received. If 
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yes, the subroutine sets the motor power at zero and the 
state as auto-reverse at block 1012. If no, the 
subroutine checks if the motor has been running for over 
27 seconds at block 1010. If yes, the subroutine sets 
5 the motor power at zero and the state at auto-reverse. 
If no, the subroutine checks if the obstacle detector 
signal has been missing for 12 milliseconds or more at 
block 1014 indicating the presence of the obstacle or the 
failure of the detector. If no, the subroutine returns 

10 at block 1018. If yes, the subroutine checks if the wall 
control or radio signal is being held to override the 
infrared obstacle detector at block 1016. If yes, the 
subroutine returns at block 1018. If no, the subroutine 
sets the reason as infrared obstacle detector obstruction 

15 at block 1020. The subroutine then sets the motor power 
at zero and the state as auto-reverse at block 1022 and 
returns at block 1024. (The auto-reverse routine stops 
the motor for 0.5 seconds then causes the door to travel 
up. ) 

20 The appendix attached hereto includes a source 

listing of a series of routines used to operate a movable 
barrier operator in accordance with the present 
invention . 

While there has been illustrated and described a 
25 particular embodiment of the present invention, it will 
be appreciated that numerous changes and modifications 
will occur to those skilled in the art, and it is 
intended in the appended claims to cover all those 
changes and modifications which followed in the true 
30 spirit and scope of the present invention. 
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What is claimed is : 

1. A movable barrier operator operable from 
alternating current comprising: 

an electric motor; 
5 a transmission connected to the motor to be driven 

thereby and to the movable barrier to be moved; 

an electric circuit for detecting AC line voltage 
and frequency of the alternating current; 

a worklight; 

10 a first set of operational values for operating the 

worklight, when a first AC line frequency is detected; 

a second set of operational values for operating., the 
worklight, when .a second AC line frequency is detected; 
and 

15 a controller, responsive to the detected AC line 

frequency, for activating the corresponding operational 
set of values for operating the worklight. 

2. A movable barrier operator operable from 
alternating current according to claim 1 wherein the 

20 first AC line frequency comprises 50 Hz and the first set 
of values comprises a first shut-off time and the second 
AC line frequency comprises 60 Hz and the second set of 
values comprises a second shut-off time. 

3. A movable barrier operator operable from 
25 alternating current according to claim 2 further 

comprising a routine for controlling motor speed and 
wherein the first set of values further comprises a 
scaling factor for scaling the motor speed. 

4. A movable barrier operator operable from 
30 alternating current according to claim 3 wherein the 

scaling factor is stored in a look-up table stored in a 
memory . 
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5. A movable barrier operator operable from 
alternating current according to claim 2 wherein the 
first shut-off time comprises about two and one half 
minutes and wherein the second shut-off time comprises 

5 about four and one half minutes. 

6. A movable barrier operator having linearly 
variable output speed, comprising: 

an electric motor having a motor output shaft; 
a transmission connected to the motor output shaft 
10 to be driven thereby and to the movable barrier to be 
moved; 

a circuit for providing a pulse signal comprising a 
series of pulses; 

a motor control circuit responsive to the pulse 
15 signal, for starting the motor and for determining the 
direction of rotation of the motor output shaft; and 

a controller for controlling the length of the 
pulses in the pulse signal in accordance with a 
predetermined set of values, wherein in accordance with 
20 the predetermined set of values, a speed of the motor is 
linearly varied from zero to a maximum speed and from the 
maximum speed to zero. 

7. A movable barrier operator according to claim 6 
wherein the predetermined set of values causes 

25 incrementing of the motor speed from zero to a maximum 

motor speed in a plurality of steps, causing the motor to 
operate at the maximum speed for a predetermined period 
of time, then decrementing the motor speed from the 
maximum speed to zero in a plurality of steps. 
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8. A movable barrier operator according to claim 7 
wherein each step comprises a value corresponding to 
about five percent of a maximum speed of the motor. 



9. A moveable barrier operator according to claim 
6 wherein the motor control circuit comprises: 

a first electromechanical switch for causing the 
motor output shaft to rotate in a first direction; 

a second electromechanical switch for causing the 
motor output shaft to rotate in a second direction; and 

a solid state device responsive to the pulse signal, 
for providing current to the motor to cause it to rotate. 

10. A movable barrier operator according to claim 9 
wherein the first and second electromechanical switches 
comprise relays and the solid state device comprises an 
FET. 

11. A movable barrier operator which automatically 
detects barrier size, comprising: 

an electric motor having a maximum output speed; 

a transmission connected to the motor to be driven 
thereby and to the movable barrier to be moved; 

a position detector for sensing the position of the 
barrier with respect to a frame of reference; and 

a controller, responsive to the position detector, 
for calculating a time of travel between a first barrier 
travel limit and a second barrier travel limit and 
responsive to the calculated time of barrier travel, for 
automatically adjusting a barrier travel speed. 

12. A movable barrier operator according to claim 
11 wherein the barrier comprises a segmented panel door 
and wherein the controller adjusts the barrier travel 
speed such that a maximum barrier travel speed is based 
on one hundred percent of the motor's maximum output 
speed. 

13. A movable barrier operator according to claim 
11 wherein the barrier comprises a single panel door and 
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wherein the controller adjusts the barrier travel speed 
such that a maximum barrier travel speed is based on 
percentage less than one hundred percent of the motor's 
maximum output speed. 

5 14. A movable barrier operator according to claim 

12 further comprising a routine for varying the motor 
speed in accordance with a predetermined set of values, 
wherein in accordance with the predetermined set of 
values, a speed of the motor is linearly varied from zero 

10 to a maximum speed and from the maximum speed to zero. 

15. A movable barrier operator according to claim 

13 further comprising a routine for varying the motor 
speed in accordance with a predetermined set of values, 
wherein in accordance with the predetermined set of 

15 values, a speed of the motor speed is linearly varied 

from zero to the motor's scaled output speed and from the 
motor's scaled output speed to zero. 

16. A movable barrier operator having full closure, 
comprising : 

20 an electric motor; 

a transmission connected to the motor to be driven 
thereby and connectable to a movable barrier to be moved; 

a position detector for sensing a position of the 
barrier; 

25 a learn routine for determining a minimum reversal 

position of the barrier relative to a close limit, 
wherein the minimum reversal position of the barrier 
position is located a short distance above the close 
limit ; 

30 a controller responsive to the position detector and 

to a close command to move the barrier to the close 
limit, for controlling the motor, wherein when the 
position detector senses the position of the barrier at 



the minimum reversal position, the controller causes the 
motor to continue to operate for a predetermined period 
of time prior to shutting off the motor, effective for 
driving the barrier to the close limit. 

17 . A movable barrier operator according to claim 
16 wherein the electric motor comprises a DC motor. 

18. A movable barrier operator according to claim 
16 wherein the electric motor comprises an AC motor. 

19. A movable barrier operator according to claim 
16 wherein the minimum reversal position is located 
approximately one inch above the close limit. 

20. A movable barrier operator according to claim 
16 wherein the close limit corresponds to a location of 
floor . 

21. A movable barrier operator having automatic 
force settings, comprising: 

an electric motor; 

a transmission connected to the motor to be driven 
thereby and connectable to the movable barrier to be 
moved; 

a circuit for providing a pulse signal comprising a 
series of pulses; 

a motor control circuit, responsive to the pulse 
signal, for starting the motor and for determining the 
direction of rotation of the motor output shaft; 

a first force command device for setting a first 
force limit for use when the motor is rotating in a firs 
direction; 

a second force command device for setting a second 
force limit for use when the motor is rotating in a 
second direction; and 



a controller responsive to the first force limit and 
to the second force limit for varying the length of the 
pulses in the pulse signal, effective for varying the 
motor speed during travel in the first direction and in 
the second direction. 

22. A movable barrier operator according to claim 
21 wherein the barrier comprises a door having a 
pedestrian door and the operator further comprises a 
sensor for detecting the position of the pedestrian door, 
wherein the controller, responsive to the pedestrian door 
sensor detecting the pedestrian door is not closed, 
disables movement of the barrier. 

23. A moveable barrier operator according to claim 
21 wherein the motor control circuit comprises a first 
electromechanical switch for causing the motor output 
shaft to rotate in the first direction, a second 
electromechanical switch for causing the motor output 
shaft to rotate in the second direction and a solid state 
device responsive to the pulse signal, for providing 
current to the motor to cause it to rotate. 

24. A movable barrier operator according to claim 
21 wherein the first force command device comprises a 
force potentiometer for generating a first analog force 
signal and the second force command device comprises a 
force potentiometer for generating a second analog force 
signal . 

25. A movable barrier operator according to claim 
24 further comprising a first A/D converter for 
converting the first analog signal to a first digital 
signal and a second A/D converter for converting the 
second analog signal to a second digital signal. 
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26. A movable barrier operator according to claim 
25 further comprising a look-up table comprising a 
plurality of motor speeds stored in a memory in the 
controller, wherein responsive to the first digital 

5 signal and the second digital signal selects a 

corresponding motor speed stored in the look-up table. 

27. A movable barrier operator having a flasher 
module, comprising: 

an electric motor; 
10 a transmission connected to the motor to be driven 

thereby and connectable to a movable barrier to be moved; 
a flasher module light; 

a flasher routine for enabling and disabling the 
flasher module light in a predetermined pattern; 

15 a controller, responsive to a command to move the 

barrier, for controlling the motor and for automatically 
detecting the presence of the flasher module light, 
wherein responsive only to the presence of the flasher 
module light, the controller executes the flasher routine 

20 and delays starting the motor for a predetermined delay 
time . 

28. A movable barrier operator according to claim 
27, wherein the flasher routine continues until the 
controller causes the motor to stop. 

25 29. A movable barrier operator according to claim 

27 wherein the predetermined delay time comprises about 
two seconds. 

30. A movable barrier operator according to claim 
27, wherein the flasher routine continues only during the 
30 predetermined delay period. 
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Abstract of the Disclosure 
A movable barrier operator having improved safety 
and energy efficiency features automatically detects line 
voltage frequency and uses that information to set a 
5 worklight shut-off time. The operator automatically 

detects the type of door (single panel or segmented) and 
uses that information to set a maximum speed of door 
travel. The operator moves the door with a linearly 
variable speed from start of travel to stop for smooth 

10 and quiet performance. The operator provides for full 

door closure by driving the door into the floor when the 
DOWN limit is reached and no auto-reverse condition has 
been detected. The operator provides for user selection 
of a minimum stop speed for easy starting and stopping of 

15 sticky or binding doors. 
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254 

Set motor state 
as traveling up 



258 

Up Position 
subroutine 



v 



I 



259 

Update relay 
safety system 



260 



Was a wall control ^- 
command or radio 
command received? 



No 



_Yes- 



261 
Set motor 
power to 20% 



-Yes_- 



263 

Are we training 
v the limits 7 



264 

Update the limit 
training state 
machine 



■ ' 265 ' / 
Ss it time to 
^travel down.?-' 

Yfes 



.No. 



266 

Set state as 
traveling down 



262 

Set state as 
traveling down 



r i 



267 
Update light 
and return 



C 



168 
Down 
Direction 
subroutine 



1% 



169 

Wait until main loop 
routine refreshes the 
down limit from 
EEPROM 



170 



Has 40 ms passed 
since the closing of 
the light relay? / 



Y|s 



• 172 
Are we flashing^ 
the warning light 
prior to travel>' 



No / jD 



one 



-No. 



1 



171 
Return 



-Yes. 



1 



173 

Update status of 
blinking light and 
return 



174 
Turn on the 
down motor 
relay 



-t- 



2o A 



x 

175 



Has one second 
passed since we first 
Turned on the motoF 



Yes 



_Yes- 



x 

/' 176 

Has the RPM 
signal timed out? 

X 

/ 177 

' Are we currently 
ramping the motor's 
"\ speed up? /' 



/ 



.Yes — 



_Yes_ 



179 
Is the door 
beyond the down 
-limit setting? 



'178 ' / 
• Is the measured 
RPM period longer 
than the allowable 
RPM period'' 



No 



rjo 



180 

Set the reason 
as force 
obstruction 



^ ' 185 ' 

Is the door's exact 
position currently 
unknown? 



I 



181 

If training limits, 
update training 
status 



A 



182 

Set motor power / 
at zero 



No 



186 

Update the door's 
distance from its 
down limit 



-Yes- 



-Yes- 



183 

Set motor state 
as autoreverse 



184 
Return 



r 



I 



.Yes. 



-No- 



- 188 

^Has the motor been 
. powered for at least 
^\ one second? 



Y<?s 




Is the door being 
manually positioned 
in the training cycle'' 



.Yes. 



190 

Set the reason 
as reaching the 

limit 



No 



191 



No. 



192 

Are the limits 
Jseing trained 7 

Yes 



t 

194 

Update the limit 
training machine y ' k ' 



"Is the door within the 
slow-down distance 

ofthelim'rP / 



-No. 



Y5s 



193 

Set the motor 
slow down flag 



/ 




196 

Set the motor's 
power at zero and 
state as at tytf$o*Tt^ 
position 



< 



Was a wall control 
command or radio 
jmmand receives 



-Yes. 



i: 



197 
Return 






198 

Has the motor been" 
running for over 27 
seconds? 



-Yes. 



206 

Set the reason 
as early limit 



199 

Set motor power at 
zero and state as 
autoreverse 



Has the protector 
signal been missing 

"tor 12 ms or more? 

y 




Yes, 



207 

Set motor power at 
zero and the state / v 
as autoreverse 



▼ 

208 
Return 




202 / 
Return 



203 



Set the reason as 
infrared protector 
obstruction 



.1* 



204 

Set the motor powe r 

at zero and the 
state as autoreverse 



205 
Return 



f 



i 
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DECLARATION 
FOR UTILITY OR DESIGN 
PATENT APPLICATION 



Declaration 

Submitted 

With 

Initial 

Filing 



X Declaration 
Submitted 
After 
Initial 
Filing 



Attorney Docket No.: 64231 
First Named Inventor: 

ffTT7,(tlTRRr>W Pi- ^1 



Application Number: 
Filing Date: 
Group Art Unit: 
Examiner Name: 



09/161, 840 
September 28, 1998 
2837 

Not Assigned 



As a below named inventor, I hereby declare that: 

My residence, post office address and citizenship are as stated below next 
to my name . 

I believe I am the original, first and sole inventor (if only one name is 
listed below) or an original, first and joint inventor (if plural names are 
listed below) of the subject matter which is claimed and for which a patent 
is sought on the invention entitled: 



MOVABLE BARRIER OPERATOR 



(Title of Invention) 

the specification of which: 

( ) is attached hereto, or 



(X) was filed by an authorized person on my behalf on Sept. 28, 1998 

(Date) 

as United States Application Number 09/161 . 840 

or PCT International Application Number , 

and was amended on (if applicable) . 

(Date) 

I hereby state that I have reviewed and understand the contents of the 
above- identified specification, including the claims, as amended by any 
amendment specifically referred to above. 

I acknowledge the duty to disclose information which is material to 
patentability as defined in Title 37, Code of Federal Regulations, §1.56. 

I hereby claim foreign priority benefits under Title 35, United States 
Code, §119 (a) -(d) or §365 (b) of any foreign application (s) for patent or 
inventor's certificate, or §365 (a) of any PCT international application 
which designated at least one country other than the United States of 
America, listed below, and I have also identified below, by checking the 
box, any foreign application for patent or inventor's certificate, or any 
PCT international application, on this invention filed by me or my legal 
representatives or assigns and having a filing date before that of the 
application on which priority is claimed: 



Declaration 1-998 



At. }ney Docket No. 642 31 



Prior Foreign Certified 
Application Foreign Priority Copy Attached 
Number (s) Country Filing Date Not Claimed Yes No 



None 



□ □ □ 

□ □ □ 

□ □ □ 

□ □ □ 

□ □ □ 

□ □ □ 



□ Additional foreign application numbers are listed on a supplemental 
priority data sheet attached hereto. 

I hereby claim the benefit under Title 35, United States Code, §119 (e) of 
any United States provisional application (s) listed below: 

Provisional Application Provisional Application 
Number (s) Filing Date 



None 



"□ Additional provisional application numbers are listed on a supplemental 
11 priority data sheet attached hereto. 

Jl hereby claim the benefit under Title 35, United States Code, §120, of 
"any prior United States application (s) , or under §365 (c) of any PCT inter- 
national application (s) designating the United States of America, listed 
2below and, insofar as the subject matter of each of the claims of this 
^Application is not disclosed in the prior United States or PCT inter- 
national application (s) in the manner provided by the first paragraph of 
Qritle 35, United States Code, §112, I acknowledge the duty to disclose 
Gall information known by me to be material to patentability as defined 
I3in Title 37, Code of Federal Regulations, §1.56, which became available 

between the filing date of the prior application (s) and the national or 

PCT international filing date of this application: 

Filing Date of 
Prior PCT U.S. or PCT 

Prior U.S. International International Patent Number 

Application Number Application Number Application (if applicable) 



None 



□ Additional U.S. or PCT international application numbers are listed on 
a supplemental priority data sheet attached hereto. 

As a named inventor, I hereby appoint the following registered practi- 
tioners, with full power of substitution and revocation, to prosecute 
this application and to transact all business in the United States Patent 
and Trademark Office connected therewith, and request that all corres- 
pondence and telephone calls in respect to this application be directed 
to FITCH, EVEN, TABIN & FLANNERY, Suite 900, 135 South LaSalle Street, 
Chicago, Illinois, 60603-4277, Telephone No. (312) 372-7842, Facsimile 
No. (312) 372-7848: 



Declaration 2-998 



At t .xney Docket No. 64231 



Registered 


Registration 


Registered 


Registration 


Practitioner 


Number 


Practitioner 


Number 


Morgan L. Fitch, Jr 
Francis A. Even 


17,023 


Karl R. Fink 


34, 161 


16, 880 


Donald A. Peterson 


18, 647 


Julius Tabin 


16, 754 


James R. McBride 


24,275 


John F. Flannery 


19,759 


Bruce R. Mansfield 


29,086 


Robert B. Jones 


20, 135 


Jeannette M. Walder 


30, 698 


James J. Schumann 


20, 856 


James J. Myrick 
Mark A. Hamill 


25,901 


James J. Hamill 


19,958 


37, 145 


Timothy E. Levstik 


30, 192 


Perry J. Hoffman 


37, 150 


Joseph E. Shipley 


31, 137 


James P. Krueger 


35,234 


Robert J. Fox 


27,635 


Mark W. Hetzler 


38,183 


Kenneth H. Samples 


25,747 


Timothy P. Maloney 


38,233 


Philip T. Petti 


31, 651 


Thomas F. Lebens 


38,221 


John S . Paniaguas 


31, 051 


Steven S. Favakeh 


36,798 


Richard A. Kaba 


30,562 







I hereby declare that all statements made herein of my own knowledge are 
true, and that all statements made herein on information and belief are 
believed to be true; and further that these statements were made with the 
knowledge that willful false statements and the like so made are punishable 
by fine or imprisonment, or both, under Section 1001 of Title 18 of the 
United States Code, and that such willful false statements may jeopardize 
the validity or enforceability of the application or any patent issued 
thereon . 



Full name of sole or one 
joint inventor: 



Inventor' s signature : 
Date: 

Residence: 

Post Office Address: 



James J. Fitzqibbon 



(Given names first, with Family name last) 




Illinois 



(City and State for U.S. Residents; 
City and Country for others) 

U 0 - Carol Ann Driver 



rp j mwood. 



IL 



C01C7 



Citizenship: 



U.S.A. 



Full name of sole or one 
j oint inventor : 



Inventor' s signature : 
Date: 

Residence : 



Paul E. Wanis 



(Given names first, with Family name last) 



Chicago. Illinois 



(City and State for U.S. Residents; 
City and Country for others) 
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Registered 
Practitioner 

Morgan L. Fitch, Jr. 
Francis A. Even 
Julius Tabin 
John F. Flannery 
Robert B. Jones 
James J. Schumann 
James J. Hamill 
Timothy E. Levstik 
Joseph E. Shipley 
Robert J. Fox 
Kenneth H. Samples 
Philip T. Petti 
John S . Paniaguas 
Richard A. Kaba 



Registration 
Number 

17,023 
16, 880 
16,754 
19,759 
20,135 
20, 856 
19,958 
30, 192 
31, 137 
27,635 
25,747 
31, 651 
31, 051 
30, 562 



Registered 
Practitioner 

Karl R . Fink 
Donald A. Peterson 
James R. McBride 
Bruce R. Mansfield 
Jeanne tte M. Walder 
James J. Myrick 
Mark A. Hamill 
Perry J. Hoffman 
James P . Krueger 
Mark W. Hetzler 
Timothy P. Maloney 
Thomas F . Lebens 
Steven S. Favakeh 



Registration 
Number 

34 , 161 
18, 647 
24,275 
29 , 086 
30, 698 
25, 901 
37, 145 
37,150 
35,234 
38, 183 
38,233 
38,221 
36, 798 



I hereby declare that all statements made herein of my own knowledge are 
true, and that all statements made herein on information and belief are 
believed to be true; and further that these statements were made with the 
knowledge that willful false statements and the like so made are punishable 
by fine or imprisonment, or both, under Section 1001 of Title 18 of the 
United States Code, and that such willful false statements may jeopardize 
the validity or enforceability of the application or any patent issued 
thereon. 



Full name of sole or one 
joint inventor: 



Inventor's signature: 



Date: 



James J. Fitzqibbon 



(Given names first, with Family name Inst) 



Residence : 



Post Office Address 



Streamwood, Illinois 



(City and State for U.S. Residents; 
City and Country for others) 



10 Carol Ann Drive 



Streamwood. IL 60107 



Citizenship: 



Full name of sole or one 
joint inventor: 



Inventor's signature: 
Date: 

Residence : 



U.S.A. 



Paul 



(Giv 




with Family name- last,) 



Chicago . tWaai h S/fa 1 #A /Pl^ 

(City and State for U.S. Residents ; / 
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Post Office Address : 
Citizenship: 

Full name of sole or one 
joint inventor: 

Inventor ' s s ignature : 
Date: 

Residence : 
= f ; -Post Office Address: 

^Citizenship : 

]=% Full name of sole or one 
,7 joint inventor: 

y inventor's signature: 
Date : 

Residence : 

Post Office Address: 



At jrney Docket No. 642 31 



6^5— WergtrTT l iUliLwuuO- Avenu e 
Sam Oi£C,o <La o§- 





U.S.A. j. 

Colin B. Willmott _> 

(Given names first, with Family name last) 



Buffalo Grove. Illinois 

(City and State for U.S. Residents; 
City and Country for others) 

917 Saybrook Lane 

Buffalo Grove, IL 60089 



U.S.A. 



(Given names first, with Family name last) 



(City and State for U.S. Residents; 
City and Country for others) 



Citizenship : 



At l Jney Docket No. 64231 



Post Office Address: 



625 West Wrightwood Avenue 



Chicago, IL 60614 



Citizenship; 



Full name of sole or one 
joint inventor: 



Inventor's signature: 
Date: 

Residence : 

Post Office Address: 



Citizenship : 



Full name of sole or one 
joint inventor: 



Inventor' s signature : 
Date: 

Residence : 

Post Office Address: 



U.S.A. 



Colin B. Willmott 



(Given names first, with Family name last) 



Buffalo Grove. Illinois 



(City and State for U.S. Residents; 
City and Country for others) 



917 Saybrook Lane 



Buffalo Grove. IL 60089 



U.S.A. 



(Given names first, with Family name last) 



(City and State for U.S. Residents; 
City and Country for others) 



Citizenship: 
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PRO7000 DC Motor Operator 

Manual forces, automatic limits 

New learn switch for learning the limits 

Code based on Flex GDO 



Notes : 



; -- Motor is controlled via two Form C relays to control direction 

; — Motor speed as controlled via a fet (2 IRF540's in parallel) with a 

; phase control PWM applies. 

; — Wall control (and RS232) are P98 with a redundant smart button and 
; command button on the logic board 



Flex GDO Logic Board 

Fixed AND Roiling Code Functionality 
Learr. from keyless entry transmitter 
Posi-lock 

Turn or. light frorr broken IR bear (when at up limit) 

Keyless entry temporary password based on number of hours or number 

of activations. (Rolling code mode only) 

GDO is initialized tc a 'clean slate' mode when the memory is erased. 
In this mode, the GDO will receive either fixed or rolling codes. 
When the first radio code is learned, the GDO locks itself into that 
mode (fixed or rolling; until the memory is again erased. 

Rolling code derived froir the Leaded€7 code 

Using the 8K zilog 233 chip 

Timer interrupt needec to be 2X faster 



Revision History 
Revision 1.1: 

-- Changed iigr.t frcr broxer. 1? bear, tc work in both fixed and rolling 
modes . 

— Changed light frcr IR bear tc work only on beam, break, not on bear 
block . 

Revision 1.2: 

— Learning rolling code formerly erased fixed code. Mode is now- 
determined by first transmitter learned after radio erase. 

Revision 1.3: 

-- Moved radio interrupt disable to reception of 20 bits. 

— Changed mode of radio switching. Formerly toggled upon radio error, 
now switches in pseudc-randcr. fashion depending upon value of 

125 ms timer. 

Revision 1.4: 

-- Optimized portion of radio after bit value is determined. Used 
relative addressing tc speed code and minimize ROM size. 



Changed mode of learning transmitters. Learn command is now 
light -command, learn light is now light-lock, and learn open/close/ 
stop is iocx-comr.-r.d . f Command was press light, press command, 
release Iigr.t, release command, wcrklight was press light, press corns 
release command, release light, o/c/s was press lock, press command, 
release command, release lock. This caused DOG2 to reset; 
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Revision 1.6: . 
— Light button and light transmitter now ignored during travel. 
Switch data cleared only after a command switch is checked. 

Revision 1.1: 

Rejected fixed mode (and fixed mode test) when learning light and 

open/close/stop transmitters. 

Revision 1.8: 

-- Changed learn from wall control to work only when both switches are 
held. Modified force pot. read routine (moved enabling of blank 
time and disabling of interrupts, . Fixed mode now learns command 
with any combination of wail control switches. 

Revision 1.9: 

Changed PWK output to go from 0-50% duty cycle. This eliminated the 

problem of PWK interrupts causing problems near 100% duty cycle. 
THIS REVISION REQUIRES A HARDWARE CHANGE. 

Revision 1 . 9A : 

— Enabled ROM checksum. Cleaned up documentation. 

Revision 2.0: , 
-- Elan", time noise imm -r.it - 1 y . If ncise signal is detected during blank tire the aata 
already recieveo is net thrown oat. The data is retained, and the noise 
pulse is identified as such. The interrupt is enabled to contine to look 
for the sync pulse. 

Revision 2. OA: 

-- On the event that the noise poise is of the same duration as the sync pu.se, 
the time between sync and first data pulse (inactive time) is measured. The 
inactive time is 5.14ms fcr billion code and 2.4ms for rolling code. If it is 
determined that the previously received sync is indeed a noise pulse, the pulse 
is thrown cut ar.c tr.e mmrc continues to look for a sync pulse as in Rev. 2.C. 

Revision 2.1: 

— To make the blank time mere impervious tc noise, the sync pulses are 
differentiated between. Fixed max width is 4.6ms, roll max width is 2.3ms. 
This is simular tc tr.e inactive time check done in Rev. 2. OA. 

Revision 2.2: . . 

-- The workiiaht functicr.; wher. the IF bear is broken and the door is at the up iimi. 
the liaht will turn or. fcr 4.5 mm. Tms revision allows the wcrkiignt function to 
be enabled ar.c cisacled fc tr.e user. The function will come enaoled from the factor^. 
To disable, wth the licht off press and held the light butter, fcr 7 sec. The light will 
come on and after ~ sec" the function is disabled the light will turn off. Tc enar^e the 
functor., turn tr.e light on, release the button, then press and held the light button 
dowrTfor' "7 sec. The light will turn eff and after the function has been enable m 1 sec. 
the light will turn en. 

Revision 3.0: 

-- Integrated in functionality for Siminor rolling code transmitter. The Simmor 
transmitter may be received, whenever a C code transmitter may be received. 
Siminor transmitters are able to perform as a standard command or as a light 
control transmitter, but net as an cpen/close/stop transmitter. 

Revision 3.1: 

-- Modified handlinc of rolling code counter (in mirroring and adding) to improve 
efficiency and hopefully kill all short cycles when a radio is jammed on the 
air . 

PRC7 00C 

Revision 0.1: 

-- Removed physical lirr.t tests 
-- Disabled racic temp crarily 

— Put in sign bit test for limits 

— Automatic limits working 
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Revision 0.2: 

-- Provided for traveling up when too close to limit 
Revision 0.3: 

— Changed force pot. read to new routine. 

-- Disabled Tl interrupt and all old force pot. code 

— Disabled all RS232 output 

Revision 0.4: 

— Added in (veerrrry) rough force into pot. read routine 
Revision 0.5: 

— Changeo EEPRGM ir. comments to add in up limit, last operation, and 
down limit. 

-- Created OnePass register 

— Added in limit read from nonvolatile when going to a moving state 

— Added in limit read on power-up 

— Created passcounter register to keep track of pass point {s) 

— Installed basic wake-up routine to restore position based on last state 

Revision 0.6: 

-- Changed RPM time read to routine used in P9S tc save RAK 

-- Cnangec operation of RPM forced up travel 

-- Irr.plemer.tec pass point fcr cr.e-pass-pomt travel 

Revision 0 . n : 

-- Changed pass point from single to multiple (no EEPROM support) 
Revision C.8: 

— Changec all SKIFRADIO loads from. OxFF to NOEECOMK 

— Installed EEPROM support fcr multiple pass points 

Revision 0.9: 

-- Cnangec' state machine tc r.ar.dle wake-up (i.e. always head towards 
the lowest pass point tc re-crient the GDC! 

Revision CIO: 

— Changed the AC line input routine to work off full-wave rectified 
AC coming in 

Revision C . 1 I : 

-- Installed the phase control fcr meter speed control 
Revision C.I2: 

-- Installed traveling dewr. if toe near up limit 
-- Installed speed-up when starting travel 
-- Installed slow-down wr.er. ending travel 

Revision 0.13: 

-- Re-activated the C code 

Revision C . 14 : 

— Adaed in conditional assemriy for Siminor radio codes 
Revision 0.15: 

— Disabled old wail control code 

-- Changed all pins tc conform, with new layout 

— Removed unused constants 

-- Commented out old wail control routine 

— Changed code tc run at 6MKz 

Revisicr C.lt 

-- rixec tugs in Flex radic 
Revi s i or. Z . 1 ~ 

-- Fe-enableo cia wall ccntrcl. Changed command charging time tc 12 m.s 
to fix FMEA problems with IR protectors. 



Re 



. 16 
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— Turned or. learn switch connected to EE PROM clock line 
Revision 0.19 

— Eliminated unused registers 

-- Moved new registers out of radio group 

— Re-enabled radio interrupt 

Revision 0.2 0 

— Changed limit test to account for "lost" position 
-- Re-wrote pass poir.t routine 

Revision 0.21 

-- Changed lur.it tests ir. state setting routines 

— Changed criteria for looking for lost position 

— Changed lost operation tc stop until position is known 



Revision 0.22: 

— Added in L_A_C state machine tc learn the limits 

— Installed learr.-command to go into LAC mode 

— Added in command button and learn button jog commands 

— Disabled limit testing when in learn mode 
-- Added in LED flashing fcr in learn mode 

-- Added in EVERYTHING with respect to learning limits 
NCTE : LAC still isn't working properly' ! ! 

Revision C.23: 

-- Addec in RS232 functionality over wall control lines 



Revision 0.24: 

-- Touched up RS232 over wall control routine 

-- Removed 50Kz force table 

-- Added in fixes tc LAC state ir.acnme 



Revision C . 2 5 : 

— Added switch set anc release for wall control (NOT smart switch) 
into RS232 commands (Turned debouncer set and release in to subs) 

-- Added smart switch into RS232 commands (smart switch is also a sub) 

— Re-enabled pass point test in 1 : ' RS232 command 

— Disabled smart switch scar, when in RS232 mode 

-- Corrected relative references m deoouncer subroutines 
-- RS232 'F' comma nc still neeus tc be fixed 

Revision C.2€: 

-- Addea m max. fcrce operatic:, until motor ramp-up is done 
-- Added in clearing cf slowdown flag in set_any routine 
-- Changed RPK timeout from 3C tc 60 ms 

Revision C.2": 

-- Switched phase control to cff, then on (was on, then off) inside 

each half cycle of the AC line (for noise reduction) 
-- Changed from 4 0ms unit max. period to 32 (will need further changes) 
-- Fixed bug in force ignore during ramp (previously jumped from down to 

up state machine!) 

— Added in complete force ignore at very slow part of ramp (need to change 
this tc ignore when very close tc limit) 

-- Removed that again 

-- Bug fix — changed fcrce skip during ramp-up. Before, it kept counting 
down the force ignore timer. 

Revision 0.2B: 

— Modified the wall control documentation 

-- Installed blinking tr.e wall control or. an IR reversal instead cf the 
worklight 

— Installed blinxmg the wall control when a pass point is seen 
Revision 0.25: 

— Changed max. RPK timeout tc 10C ms 
-- Fixed wall control blm.< big 

-- Raised minimum speed setting 
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NOTE: Forces still need to be set to accurate levels 
Revision 0.30: 

— Removed 'ei' before setting of peon register 

— Bypassed slow-down to limit during learn mode 

Revision 0.31: 

— Changed force ramp to a linear FORCE ramp, not a linear time ramp 
— Installed a look-up table to make the ramp more linear. 

— Disabled interrupts during radio pointer match 

— Changed slowdown flag tc a up-dewn-stop ramping flag 

Revision 0.32: 

— Changed down limit to drive lightly into floor 

— Changed down limit when learning to back off of floor a few pulses 
Revision 0.33: 

— Changed max. speed to 2/3 when a short door is detected 
Revision 0.34: 

— Changed light timer tc 2.5 minutes for a 50 Hz line, 4.5 minutes^for 

a 60"hz line. Currently, the light timer is 4.5 minutes WHEN THr. UNIT 
FIRST POWERS U? . 

— Fixed profclerr wit:, leaving F ? set tc an extended group 

Revision C.35: 

— Changed starting position of pass point counter to 0x30 
Revision 0.36: 

-_ changed algorithm for finding down limit to cure stopping at the floor 

during the learn cycle 
-- Fixed bug in learning limits: Up limit was being updated from EE PROM 

during the learr. cycle 1 
-- Changed method of checking when lint is reached: calculation for 

distance tc limit is new ALWAYS performed 

— Added in skipping of limit test when position is lost 

Revision 0.37: 

— Revised minimum travel distance and short door constants to reflect 
approximately 1C R?:< pjlses / incr. 

Revision 0.36: 

-- Moved slowstart nxioer cicser tc the iirr.it. 
-- Changes backeff numrer from 10 to S 

Revision 0.39: 

— Changed backoff number from P tc 12 



Revision 0.4C: 

-- Changed task switcher to unburden processor 
-- Consolidated tasks 0 and 4 

-- Took extra unused code out of tasks 1, 3, 5, 7 

— Moved aux light and 4 ms timer into task 6 
-- Put state machine into task 2 only 

— Adjusted auto_deiay, motdel, rprr,_time_out, f orce_ignore , motor_timer , 
obs count for new state machine tick 

— Removed force_pre prescaler (no longer needed with 4ms state machine) 

— Moved updating of obs_count to one ms timer for accuracy 

— Changed autoreverse delay timer into a byte-wide timer because it was 
only storing an 8 bit number anyways... 

— Changed flash delay and light timer constants to adjust for 4ms tick 

Revision 0.41 

Switched back tc 4MKz operation to account for the fact that Ziloc's 

ZS€"33 CZz *cr. '- rar. at 6MK= reliably 



Revision 0.42: 

-- Extended RPM timer s: that it could measure from 0 - 524 ms with 
a resolution of 8us 
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Revision '0.43: 

— Put in the new look-up table for the force pots (max RPM pulse period 
multiplied by 20 to scale it for the various speeds) . 

— Removed taskswitch because it was a redundant register 

— Removed extra call to the auxlight routine 

— Removed register 'temp' because, as far as I can tell, it does nothing 

— Removed light_pre register 

— Eliminated 'phase' register because it was never used 

— Put in preliminary divide for scaling the force and speed 

-- Created speedlevel AKC IDEAL speed registers, which are not yet used 

Revision 0.4": 

— Undid the work of revisions 0.4 4 through 0.4 6 

— Changed ramp-up and ramp-down to an adaptive ramp system 

— Changed force compare from subtract to a compare 

— Removed force ignore during ramp (was a kludge) 

— Changed max. RPM time out to 500 ms static 

— Put WDT kick in just before main loop 

— Fixed the word-wise T0EXT register 

— Set default RPM tc max. to fix problem of not ramping up 

Revision 0.46: 

-- Took out adaptive rar.p 

-- Createo look-ahead speed feedback in RPM pulses 
Rev i s i or. 0.49: 

— Removed speed feedback (again! 

NOTE: Speed feedback isn't necessarily impossible, but, after all my 
efforts, I've concluded that the design time necessary (a large 
amount! isn't worth the benefit it gives, especially given the 
current time constraints of this project. 

— Removed RPM_SET_DIFF lo and hi registers, along with I DE AL_S PEED lo 
and hi registers (only neea the- for speed feedback) 

— Deleted speecievel register (nc icnger needed) 

-- Separated the start of slowdown for the up and down directions 

— Lowered the max. speed for short doors 

— Set the learn button tc NOT erase the memory when jogging limits 
Revision C.S0: 

-- Fixed the force pet read to actually return a value of 0-64 

-- Set the msx. RPK period time out tc be equivalent to the force setting 

Revision C . 51 : 

— Added m P2K_SHAD0K register to make the following possible: 

— Added in flashing warning light (with auto-detect) 

Revision 0.52: 

— Fixed the variable worklight timer to have the correct value on 
power-up 

— Re-enabled the reason register and stackreason 

-- Enabled up limit tc back off by one pulse if it appears to be 
crashing the up stop boit. 

— Set the door to ignore commands and radio when lost 
-- Changed start of down rar.p to 220 

— Changed backoff from 12 to 5 

— Changed drive-past of down limit to 9 pulses 

Revision 0.53: 

— Fixed RS232 '9' and 'F' commands 

— Implemented RS232 'K' command 

-- Removed ' M 1 , ' P', ar.c 'S' :crr = r.d; 

-- Set the learn LED to always turn off at the end of the 
learn limits mooe 

Revision 0 . 54 : 

— Reversed the direction of the pot. read to correct the direction 
of the mir. . and max. forces when dialing the pots. 

— Added in "U" command (currently does nothing) 
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— Added in "V" command to read force pot. values 
Revision 0.55: 

— Changed number of pulses added in to down limit from 9 to 16 
Revision 0.56: 

— Changed backoff number from 16 back to 9 (not 8!) 

— Changed minimum force/speed from 4/20 to 10/20 

Revision 0.57: 

— Changed backoff number back tc 16 again 

— Changed minimum force/speed from 10/2C back to 4/20 

— Changed learning speed from 10/20 to 20/20 

Revision 0.58: 

-- Changed learning speed from 20/20 to 12/20 (same as short door) 

— Changed force to max. during ramp-up period 

— Changed RPK timeout tc a static value of 500 ms 

-- Changed drive-past of limit from 1" tc 2" of trolley travel 

(Actually, changed the number from 10 pulses to 20 pulses) 
-- Changed start of ramp-up from 1 to 4 (i.e. the power level) 

— Cnanged the algorithm when near the limit — the door will no 
longer avoid going towara the limit, even if it is too close 

Revision 0.59: 

-- Removed ramp -up bug from autcreverse of GDO 
Revision C.60: 

Added in check fcr pass point counter of -1 to find position when lost 

— Change in waking up when lost. GDO now heads toward pass point only on 
first operation'af ter a power outage. Heads down on all subsequent 
operations . 

-- Created the "limits unknown" fault and prevented the GDO from traveling 
when the limits are net set at a reasonable value 

— Cleared the fault code on entering learn limits mode 

— Implemented RS2 32 ' H ' command 

Revision 0.61: 

-- Changed limit test to lock fcr trolley exactly at the limit position 

-- Changed search fcr pass pemt to erase limit memory 

-- Chanaed setup position tc 2" above the pass point 

-- Set the learn LED to turn off whenever the L_A_C is cleared 

Set -the learn limits mode tc shJt off whenever the workiight times out 

Revision 0.62: 

-- Removed test fcr being exactly at down limit (it disabled the drive into 
the limit feature. 

-- Fixed bus causma the GDO tc ignore force when it should autoreverse 
-- Added in ignoring commands when lost and traveling up 

Revision 0.63: 

— Installed MinSpeed register tc vary minimum speed with force pet 
setting 

— Created main loop routine to scale the min speed based on force pot. 

— Changed drive-past of down limit from 20 tc 30 pulses (2" to 3") 

Revision 0.64: 

-- Changed learning algorithm tc utilize block. (Changed autoreverse to 
add in 1/2" to position instead of backing the trolley off of the floor) 

— Enabled ramp-down when nearing the up limit in learn mode 

Pension C.65: 

-- Put special case m speed check to enable slow down near the up limit 
Revision C.€€: 

-- Cnangec ramp-up: Ramping up of speed is now constant — the ramp-ao*n 

is the only ramp affected by the force pot. setting 
-- Chanced ramp-up and remp-dewr. tests to ensure that the GDO will get 

tc the minimum speed when we are inside the ramp-down zone (The above 
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change necessitated this) 

— Changed down limit to add in 0.2" instead of 0.5" 

Revision 0.67: 

— Removed minimum travel test in set_arev_state 

— Moved minimum distance of down limit from pass point from 5" to 2" 

— Disabled moving pass point when only one pass point has been seen 

Revision 0.68: 

— Set error in learn state if nc pass point is seen 
Revision 0.69: 

— Added in decrement of pass point counter in learn mode to kill bugs 
-- Fixed bug: Force pots were being ignored in the learn mode 

— Added in filtering of the RPK (RPK_FILTER register and a routine in 
the one ms timer) 

— Added in check of RPK filter inside RPK interrupt 

— Added in polling RPK pin inside RPK interrupt 

— Re-enabled stopping when m learn mode and position is lost 

Revision 0.70: 

-- Removed old method of filtering RPK 

— Added in a "debouncer" tc filter the RPK 

Revision 0.71: 

— Changed "debouncer" tc automatically vector low whenever an RPK pulse 
is considered valid 

Revision 0.72: 

— Changed number of pulses added in to down limit to 0. Since the actual 
down limit test checks for the position to be BEYOND the down limit 
this is the equivalent of adding one pulse into the down limit 

Revision G.74: 

— Undid tne work cf rev. L.~"2 

— Changed number of pulses added in to down limit to 1. Noting the comment 
in rev. 0.72, this means that we are adding in 2 pulses 

— Changed learning speeo to vary between 8/20 and 12/20, depending upon 
the force pot. setting 

Revision 0.75: 

-- Installed power-up cmp II cr. F22, P23, P2<5, and P25 

Note: ID is on F24, F22, ar.c F22 . F2S is a strobe to signal valid data 
First chip 12 is CC1 .«;:;. strobe, it's 1001) 

— Changed set_ar,y routine tc re-enable the wall control just in case we 
stopped while the wall centre! was being turned off (to avoid disabling 
the wall control completely' 

— Changed speed during learr. mode tc be 2/3 speed for first seven seconds, 
then to slow down tc the minimum speed to make the limit learning the same 
as operation during normal travel. 

Revision 0.76: 

— Restores learning tc operate only at 60% speed 
Revision 0.77: 

— Set unit tc reverse eff cf floor and subtract 1" of travel 

— Reverted to learning at 40% - 60% of full speed 

Revision 0.78: 

— Changed rampflag to have a constant for running at full speed 

— Used the above change to simplify the force ignore routine 

— Also used it to change the RPK time out. The time out is now set equal 
to the pet setting, except derma the ramp up when it is set tc 500 ms . 

-- Changed highest force pot setting to be exactly equal to 500ms. 

Revision C . ~ 5 : 

— Changed setup routine tc reverse off block (yet again). Added in one pulse. 
Revision 1.0: 
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— Enabled RS232 version number return 

— Enabled ROM checksum. Cleaned up documentation 

Revision 1.1: 

-- Tweaked light times for 8.192 ms prescale instead of 8.0 ms prescale 
-- Changed compare statement inside setvar light to , uge' for consistency 
-- Changed one-shot low time tc 2 ms for power line 

— Changed one-shot low time to truly count falling-edge-to-falling-edge 
Revision 1.2: 

-- Eliminated testing for lost GDO in set_up_dir_state (is already taken 

care of by set_dn_dir_state; 
-- Created special time for max. run motor timer in learn mode: 50 seconds 

Revision 1.3: 

— Fixed bug m set_any to fix stack imbalance 

— Changed short door discrimination point to 78" 

Revision 1.4: 

— Changed second 'di* tc 'ei* in KncwSimCode 

— Changed IR protector tc ignore for first 0.5 second of travel 

-- Changed blinking time constant to take it back to 2 seconds before travel 
-- Changed blinking coae to ALWAYS flash during travel, with pre-travel flash 
when module is properly detectes 

— Put in bounds checking on pass point counter to keep it in line 

-- Changed driving intc down limit to consider the system lost if floor not se 

Revision 1.5: 

— Changed blinking of wail control at pass point to be a one-shot timer 
to correct problems with bad passpomt connections and stopping at pass 
point tc cause wall control ignore. 

Revision 1 . £ : 

-- Fixed blinking cf wall contrci when indicating IR protector reversal 

to give the blink a true 50% duty cycle. 
Changed blinker output tc output a constant high instead of pulsing. 

— Changed P2S_POR tc 1010 (Indicate Siminor unit) 

Revision 1.7: 
-- Disabled Siminor Radic 

— Changed F2£_POR tc IZ'-l Cr.o 
-- Adoed in one more cor.ditiona 

Revision 1.6: 

— Re-enabled Siminor Racic 

— Changed P2S_POR back to 1010 (Siminor! 

— Re-fixed blinking cf wall control LED for protector 
-- Changed blinking of wall control LED for indicating 

— Fixed error m calculating highest pass point value 
__ Fixed error in calculating lowest pass point value 

Revisicr. 1.9: 

— Lengthened blink time for indicating pass point 

— Installed a max. travel distance when lost 

-- Removed skipping up limit test when lost 
__ Reset the position when lost and force reversing 

— Installed sample of pass point signal when changing states 

Revision 2.0: 

— Moved main loop test for max. travel distance (was causing a memory 
fault before) 

Ii00e000b instead of 10000000b to ensure 
we're actually close. 

nc to move it further down the pot. rotation . 
24; / 4) + 4, truncated to 12 
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icate Lift-Master unit) 

1 assembly point to avoid use cf simradic iaoel 



reverse^ 
pass point 



revision <l . j. : 
— Changed lim: 
or.lv settir.c 



test tc use 



Revision 2.2: 
-- Changed ir.ir.i-.\rr 
Formula is now: 



ptt J i: G ~ - . 

( (fcrce - 



3 



— Changed max. travel test to be inside motor state machine. Max. travel 
test calculates for limit position differently when the system is lost. 

— Reverted limit test to use 10000000b 

-- Changed some jp's to jr's to conserve code space 

-- Changed loading of reason byte with 0 to clearing of reason byte (very 
desperate for space) 

Revision 2.3: 

-- Disabled Siminor Radio 

-- Changed P2S_POR to 1011 (Lift-Master) 

Revision 2.4: 

-- Re-enabled Siir.inor Radio 

— Changed P2S_POR to 1010 (Siminor) 

-- Changed wall control LET to also flash during learn mode 

— Changed reaction to single pass point near floor. If only one pass point 
is seen during the learn cycle, and it is too close to the floor, the 
learn cycle will now fail. 

-- Removed an ei from the pass point when learning to avoid a race condition 

Revision 2.5: 

-- Changed backing off cf up limit to only occur during learn cycle. Backs 

off by 1/2" if learn cycle force stops within 1/2" of stop bolt. 
-- Removed considering systeir lest if floor not seer.. 
-- Changed drive-past of down limit to 36 pulses (3") 

-- Added in clearing cf power level whenever motor gets stopped (to turn off 
the FET's sooner! 

-- Added m a 40ns delay (using the same MOTDEL register as for the traveling 
states! to delay the shut-off of the motor relay. This should enable the 
motor to discharge some energy before the relay has to break the current 
flow) 

-- Created STOPNOFLASK label — it looks like it should have been there all along 
-- Moved incrementing K07DEL. timer into head of state machine to conserve space 



Revision 2.6: 

— Fixed back-off of up limit to back off in the proper direction 

— Added in testing fcr actual stop state in back-off (before was always backing 
off the limit) 

-- Simplified testing fcr light being on in 'set any' routine; eliminated lights 
register 

Revision 2.7: (Test-cniy revision' 

-- Moved ei when testing fcr aown limit 

-- Eliminated testing fcr negative number in radio time calculation 

— Installed a primitive debcuncer for the pass point (out of paranoia! 

-- Changed a pass point in the down direction to correspond to a position cf 1 
-- Installed a temporary echc cf the RPK signal on the blinker pin 
-- Temporarily disabled ROM checksum. 

-- Moved three subroutines before address 0101 to save space (2. 7B) 

— Framed look up using upforce and dnforce registers with di and ei to 
prevent corruption of upforce or dnforce while doing math (2.7C) 

— Fixed error in definition of pot_count register (2.7C) 

— Disabled actual number check of RPM perdod for debug (2.7D) 

— Added in di at test_up_sw and test_dn_sw for ramping up period (2. 7D) 

— Set RPK_TIME_OUT to always be loaded to max value for debug (2.7E) 

— Set RPM_TIME_OUT to round up by two instead of one (2.7F) 

— Removed 2.7E revision (2.7F) 

-- Fixed RPM_TIME_OUT to round up in both the up and down direction (2 . 7G) 

— Installed constant RS232 output of RPM_TIME_OUT register (2.7H) 

— Enabled RS232 'U' and "V commands (2.71) 

— Disabled consant output of 2.7H (2.71) 

-- Set RS232 tc output RPK_TIMI_OUT (2 . 71) 

-- Removed disable of actual RPM number check (2.7J) 

-- Removed pulsing tc indicate RPK interrupt (2. 7 J) 

— 2.~C note -- neec tc remove 'u' command function 

Revision 2.8: 

-- Rercved interrupt enable before resetting rpm_time_out . This will introcjee 
roughly 30us of extra delay in time measurement, but should take care cf 
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nuisance stops. 

Removed push-ing and pop-ing of RP in tasks 2 and 6 to save stack space (2.8B) 
Removed temporary functionality for 'u' command (2.8 Release) 
Re-enabled ROM checksum (2.8 Release) 



LAC State Machine 



73 11 



I 72 74* 76 

I Back to * 

7 0 Up Lim 

I 71 

I Error *.*»** 



75 



Position 
the iimi 



N SN- 


-VCl KF.KDFV MA? 




OG 


AC 


DC 


C 1 


AC 


DC 


C2 


a: 


DO 


03 


Al 


DO 


04 


A2 


Dl 


05 


A2 


Dl 


06 


A3 
A3 


Dl 


ce 


A4 


Dl 
D2 


09 


A4 


D2 


OA 


A5 


D2 


0B 


A5 


D2 


DC 


A6 


D3 


01 


Ac 


D3 


0E 


AT 




OF 


A" 


D3 


10 


AS 


D4 


i : 


AS 




12 


AS 


D4 


I 3 


AS 


D4 


14 


AID 


D5 


15 


A1C 


D5 


16 


All 


D5 


17 


All 


D5 


18 


B 


D6 


19 


B 


D6 


1A 


C 


D6 


IB 


C 


D6 


IC 


unused 


D~ 


ID 


unused 


D~ 


IE 


unused 


D7 


IF 


unused 


D7 


20 


unused 


DTCP 


21 


unused 


DTCID 


22 


unused 


DTCR1 


23 


unused 




2 4 


unused 




25 


unused 


Duration 



Multi-function transmitters 



Keyless permanent A digit code 
Keyless ID code 
Keyless Roll value 

Keyless temporary 4 digit coae 

Keyless temporary duration 

Upper byte = Mode: r.o-rs -'act: 
Lower fcvte = * cf hours. activ; 



2 6 unused Radio type 

77665544 33221100 

00 = CMD 01 = LIGHT 



Page 11 of 97 



27 



28 
29 
2A 



unused 



10 = OPEN/CLOSE/STOP 
Fixed / roll 

Upper word = fixed/roll byte 
Lower word = unused 



CYCLE COUNTER 1ST 16 BITS 
CYCLE COUNTER 2ND 16 BITS 
VACATION FLAG 



Vacation Flag , Last Operation 
0000 XXXX in vacation 

1111 XXXX out of vacation 

2B A MEMORY ADDRESS LAST WRITTEN 

2C IRLI GHHTADDR 4-22-97 

2D Up Limit 

2E Pass point counter / Last operating state 

2F Down Limit 



30-3F Force Back trace 



RS2 32 DATA 



REASON 

0 0 COMMAND 

10 RADIO COMMAND 

2C FORCE 

30 AUX OES 

4 0 A REVERSE DELAY 

50 LIMIT 

60 EARLY LIMIT 

7 0 MOTOR MAX TIME , TIME OUT 

80 MOTOR COMMANDED OFF RPM CAUSING AREV 

90 DOWN LIMIT WITH COMMAND HELD 

AO DOWN LIMIT WITH THE RADIO HELD 

B0 RELEASE OF COMMAND OR RADIO AFTER A FORCED 

UP MOTOR ON DUE TO RPM PULSE WITHG MOTOR OFF 

STATE 

0C AUTORE VERSE DE LA": 

01 TRAVELING UP DIRECTION 

02 AT THE UP LIMIT AND STCPDI 

03 ERROR RESET 

04 TRAVELING DOWN DIRECTION 

05 AT THE DOWN" LIMIT 

0€ STOPPED IN MID TRAVEL 



DIAG 



1) AOBS SHORTED 

2) AOBS OPEN / MISS ALIGNED 

3) COMMAND SHORTED 

4) PROTECTOR INTERMITTENENT 

5) CALL DEALER 

NO RPM IN THE FIRST SECOND 

6) RPM FORCED A REVERSE 
7* LIMITS NOT LEARNED YET 



DOG 2 
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DOG 2 ISA SECONDARY WATCHDOG USED TO 

RESET THE SYSTEM IF THE LOWEST LEVEL "MAINLOOP" 

IS NOT REACHED WITHIN A 3 SECOND 



Conditional Assembly 



GLOBALS ON 

Yes . equ 

No .equ 

TwoThirtyTnree .equ 

UseSirr.inor . eq_ 



; Enable a symbol file 



Yes 
Yes 



EQUATE STATEMENTS 



check_surr_value 
TIMER 1 EN 



mo!e@rtixe 

LA#IME 



.equ 
, eq j 

. eq. 
. eq. 
. ec. 



0 6 5H 
OCH 

. 2~:o: / 4 

(50C / 4, 
(500:: / 4! 



CRC checksum for ROM code 
TMR mask to start timer 1 

Kax. run for motor = 2"? sec (4 ir.s tick; 
Delay before learning limits is 0.5 seconds 
Max. run for motor in learn mode 



PWK":CKARG£ 

LlifiT 

LlbHT_ON 

mqJ:0r_uf 

MQf£0R DN 



. eq. 
. eq-_ 
, eq. 
.eq. 
. eq. 



OCH 
OFFK 

1000COCOB 
010000CCE 
0C100GGGE 



PWK state for old force pots. 
Flag for light on constantly 
P0 pir. turning on worklight 
P0 pin turning on the up motor 
P0 pin turning on the down motor 



Urf_OUT 

DC8?k_OUT 

DCgK_COX? 

uaipoKP 

F%^EIR 

lMeinfin 



PFointPort 
PessPcir.t 

PhasePrt 
PhaseKiah 



. eq_ 
. equ 
. equ 
. equ 

. eq- 
.equ 

. equ 
. equ 

. equ 
. eou 



0C1CGCG0E 
00000001E 
00QGC010E 

0 C 0 C 0 0 0 1 E 



P3 pin output for up force pot. 
P3 pin output for down force pot 
P0 pin input for down force pot . 
PC pin input for up force pot. 

P2 pin for false AOBS output 
P2 pin for reading m AC line 



Port for pass point inpu 
Bit mask for pass point 



mpu 



C0C100CCE 



Fort for phase control outp; 
Fin for controllma FET's 



CHARGE_SV; 
DIS_SW 

switches: 
switches2 



.equ 10GOCCOCE 
ClOOOCOCB 



. equ 
.equ 



000010COB 
O0CCC10CS 



; P3 Pin for charging the wall control 
F3 Pin for discharging the wall control 

; P0 Pin for first wall control input 
; P0 Pin for second wall control input 



P01M_INIT 
P2M_IKIT 
P2M_POF 
P3M IN IT 



. equ 
. equ 
. equ 
. ecu 



00000101B 
C1C111CCE 
OiCGOOOOB 
000QC011E 



set mode p00-p03 in p0 4-pO"7 out 

P2M initialization for operation 

P2M initialization for output of chip ID 

set port3 p30-p33 input ANALOG mode 



P01S_INIT 

P2S_INIT 

P2S_POR 

P3S INIT 



.equ 
.equ 
.equ 

. eou 



1000D000E 
00000110E 
00101010E 



Set init. state as worklight on, motor off 
Init p2 to have LED off 

P2 init to output a chip ID (P25, P24, P23, P22) 
Init p3 tc have everything cff 



BLINK FIN 



Pm which controls flasher module 



P2K_ALLOG'7S 
P2M ALL INS 



. eq. 
. equ 



G1011000E 



Pins which need to be refreshed 



Pins which need 



be refreshed tc inputs 



RsPerHalf 



104 



RS232 period 1200 Baud half time 4I€u£ 
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. equ 


208 


RsPerlP22 




.equ 


00 


FLASH 




.equ 


OFFH 


WORKLIGHT 




.equ 


LIGHT UN 


P POINT PULSES . 


equ 


897 




Setup Pos 




. equ 


{ bDbJS — 


CMD TEST 




. equ 


OC 


WL_TEST 




. equ 


C I 


VAC TEST 




. equ 


02 


CHARGE 




. equ 


03 


RS STATUS 




. equ 


04 


WALLOFF 




. equ 


05 


AUTO REV 




. equ 


OOH 


UP_DIRECT10N . 


.equ 


01H 




TIP pnc TTT ClK 


equ 


02H 




DN~D I RE C T I ON . 


. equ 


04 H 




DN POSITION 


.equ 


05K 




QTOP 

o i. ur 




.ecu 


0 6H 


OSS-; SVC 




. equ 


CIH 


LI$3lT_SW 




.equ 


02 H 


Vj£f_SK 

Us 




.equ 


04H 


TS& 




. equ 


OFFH 


FPjXjSE 




. equ 


OOH 


FiIeD MODE 




.equ 


10101010b 


RCfeL MODE 




.equ 


01010101b 


FMED TEST 




. equ 


OOOOOOOOfc 


RQLL TEST 




. equ 


OOOOOOClt 


FIXED_MASK 




.equ 


FIXED_TEST 


r6£l_MASK 




. equ 


ROLL_TEST 


FlMTHR 


.equ 


03H 




DfiR 




.equ 


02K 






.equ 


06H 


dS|nc 




. equ 


04 K 


r x ad - i o 




. eau 




DEITS 




. equ 


2 I 


EQUAL 




. equ 


00 


BACKWIN 




. equ 


7FH 


FWDWIK 


. equ 


6CK 




OUTOFWIN 




. equ 


OFFH 


AddressCounter 


. equ 


27K 


Address APomt 


.er 


. equ 


2BK 


CYCCOUNT 




. equ 


28K 


TOUCHID 




. equ 


2 1H 


TOUCHROLL 




.equ 


22H 


TOUCHPERK 




.equ 


2 OH 


TOUCHTEMP 




. equ 


24H 


DURAT 




. equ 


25H 


VERSIONNUM 




. equ 


088H 










IRLIGKTADDR 




.EQ-J 


2CH 


DISABLED 




. EQU 


OOH 


r 

RTYPEADDP 




. eq_ 


2 6.-: 


VACATIONADDR 


. equ 


2 AH 




MODEADDR 




. equ 


27H 



; RS232' period full time 832us 

; RS232 period 1.22 unit times 1.024ms (00 = 256) 



; Pin for toggling state of worklight 
Number of RPM pulses between pass points 
Setup position — 2" above pass point 

; States for old wall control routine 



; Hold wall control ckt . in RS232 mode 
; Turn off wall control LED for blinks 

; States for GDO state machine 



; Flags for switches hit 



; Generic constants 



; Fixed mode radio 

;Rolling mode radio 

; Unsure of mode — test fixed 

,-Unsure of mode — test roil 

;Bit mask for fixed mode 

;Bit mask for rolling mode 

; Fixed code decision threshold 

,-Rolling code decision threshold 
; Fixed code sync threshold 
;Rolling code sync threshold 
; Fixed code number of bits 
/Rolling code number of bits 

; Counter compare result constants 



; Touch code ID 

;Touch code roll value 

; Touch code permanent password 

; Touch code temporary password 

; Touch code temp, duration 

.•Version: PRO7000 V2 . 8 

;work light feature or. or off 
;00 = disabled, FF = enabled 

;Radic transmitter type 

;Rolling/Fixed mode in EE FROM 
;High byte = don't care (now! 
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3 



UFLIMADDR 




. equ 


2DH 


LASTSTATEADDR . 


equ 


2EH 




DNLIMADDR 




. equ 


2FH 


NOEECOMM 




. equ 


01111111b 


NOINT 




. equ 


10000000b 


RDROPTIME 




. equ 


125 


LRNOCS 


equ 


GAAH 




BRECEIVED 




. equ 


01 "H 


LRNLIGHT 




. equ 


0BBK 






. equ 


OCCH 


LRNDURTN 




. equ 


ODDK 


REGLEARN 




.equ 


0EEH 






OOF. 




ENTER 




. e qu 


OOH 


POUND 




. equ 


OIK 


STAR 




. equ 


02K 


ACTIVATIONS 




. ecu 


0AAK 






Q C — 


C 55H 


iff ; Flags 


for 


Ramp Fla 


g Register 


STiiL 




.equ 


OOH 




• C O ~» 


OAAH 




rakSdown 




.equ 


0FFH 


FU LJ,S PEED 




.equ 


OCCH 


upMowstart 




. equ 


20C 


down 








DNSiOW START 




.eq_ 


22 0 


direction ) 








BASKOFF 




. equ 


16 


flop- 








flair 








SHORTDOOR 




. equ 


9*2 c 


discriminates 


a 







door 



;Low byte - RadioMode flag 
;Address of up limit 
;Address of last state 

;Address of down limit 

;Flag: skip radio read/write 
;Flag: skip radio interrupts 

; Radio drop-out time: 0.5s 

;Learr. open/close/stop 

;B code received flag 

; Light command trans. 

; Learn touchcode temporary 

; Learn t.c. temp, duration 

;Regular learn mode 

; Normal command trans. 

; Touch code ENTER key 
; Touch code # key 
; Touch code * key 

.-Number of activations mode 
;Number of hours mode 



; Motor not moving 
Ramp speed up to maximum 

; Slow down the motor to minimum 
; Running at full speed 

; Distance (in pulses) from limit when slow- 
; of GDO meter starts (for up and down 

; Distance (in pulses) to back trolley off of 
; when learning limits by reversing off of 

; Travel distance (in pulses) that 

; one piece door (slow travel i froir a normal 

; (normal travel) (Roughly 78"; 



PERIODS 



AUTO_REV_TIME 
MIN_C0UNT 
TOTAL_PWK_COUNT 
FLASH TIME 



.equ 124 

.equ 02H 

.equ 0 3FH 

.equ 61 



;4.5 MINUTE USA LIGHT TIMER 

USA_LIGHT_KI .equ 060H 
OSA_LIGKT_LC .equ 0SEK 

;2.5 MINUTE EUROPEAN LIGHT 1 



EURO_L I G HT_K I 
EURO LIGHT LO 



.ecu C4"H 
.equ 08 6H 



ONE SEC 



.equ 0F4H 



(4 ms prescale) 
pwm start point 
pwm end = start + 2*total- 
0.25 sec flash time 



; 4.5 MIN 

; 4.5 KIN 



2.5 MIN 
2.5 MIN 



; WITH A / 4 IN FRONT 
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CMD_MAKE . equ 8 

CMD_BREAK .equ (255-8) 

LIGHT_MAKE .equ 8 

LIGHT_BREAK .equ (255-8) 

VAC_MAKE_OUT . equ 4 
VAC_BREAK_OUT . equ (255-4) 

VAC_MAKE_IN .equ 2 

VAC BREAK IN .equ (255-2) 



VAC_DEL 
CMD_DEL_EX 
VAC DEL EX 



. equ 
. equ 
. equ 



6 

50 



; cycle count *10mS 
; cycle count *llmS 
; cycle count *100mS 



Delay 16 ms for vacation 
Delay 12 ms ! 5*2 + 2) 
Delay 100 ms 



*** + ** + *** + + ** + * + * + + + ■******************■********************************* 

PREDEFINED REG 

ALL ON IMR .equ 00111101b ; turn on int for timers rpm auxobs radio 

RETURN~IMR .equ 00111100b ; return on the IMR 

Radiolmr .ecu 00000001b ; turn on the radio only 



GLOBAL REGISTERS 



STUTuS 



.ecu 04K 



CMD_TEST 00 
WL_TEST 01 
VAC_TEST 02 
CHARGE 03 



SfATE .eqa 05K 

LineCtr .equ 0€K 

RampFiag .equ 0~K 

AC[f'0_DELAY .equ os;-: 

LCiiePer .equ 0 9K 

MOT 0R_T I ME R_H I . equ OAK 

M©TOR_TIMEP_LO .equ 0BK 
M]S , OR_TIMER .equ 0AH 

lfe'GHT_TIMER_KI .equ 0CH 

l3£KT_TIMER_LC .eq_ 0DH 
LIGHT_TIKER .equ 0CH 

AOBSF .eqj CEK 

PrevPass . eq_ OF.-: 



state register 
Ramp up, ramp down, or stop 
; Period of AC line coming in 



CHECK_GR? 

check_sum 

rom_data 

test_adr_hi 

test_adr_lc 

test_adr 

CHECK_SUK 

ROM_DATA 

LIN_TEST_HI 

LIM_TEST_LC 

LIMJTEST 

AUXLEARNSK 

RRTO 

RPM_ACOUNT 

rs_cco*:te.- 
RS232DAT 



. equ 
. ecu 



. equ 
. equ 



. equ 
. equ 
.equ 
r2 
r3 

. equ 
. equ 
. equ 
. equ 
. equ 
.equ 



ru 
rl 



r r<- 

CHECK_GRP-r-0 
CKECr'_GP.P^l 
CHECK_GRP*G 
CHECK_GRP+i 
CHECK_GRP+0 
CHECK_GRP+2 
.equ CHECK_GRP+3 
CHECK_GRP+4 
.equ CKECK_GR?-5 
.equ CHECK GRr-t-6 



; check sum pointer 



; check sum reg for por 
; data read 

Compare registers for measuring 
distance to limit 



to test for active rpm 

; rs232 byte' cour.te: 
; rs2 32 data 



ra::c_cx: 

R DEAL T 1 
FAULT 
VAC FLAG 
VACFLASK 



. eq_ C.'-.iv.-^Gn." 

CKECK_GRF-r£ 

.equ CHECK_GRP+5 

.equ CKECK_G?F-1C 

.equ CHECK GRP+l: 



raaic corrjr.ar.o 



; VACATION mode flag 
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VACCHANGE 
FAULTTIME 
FORCE_IGNORE 
FAULTCODE 



.equ 



3 



.equ CHECK_GRP+12 

.equ CHECK_GRP+13 

CHECK_GRP+14 

.equ CHECK_GRP+15 



TIMERJ3ROUP 

position_hi 

position_Io 

position 

up_limit_hi 

up_limit_lc 

up_l imi t 

switch_delay 

obs_count 

rs command 

rs_temp_hi 

rs_tenvp_lc 

rs_temp 

POSITIONER I 
POSITION_LO 

posit I or: 
ufJStm:t_ki 

UPj|3lMIT_LO 
SWIf=CK_DELAY 

Oneffass 

OBS/^CCUKT 

Rslffiide 

DivJEscr 

RSggMMAND 

rs^t'ek?_k: 
rs];tekf_lc 

RSfTEMP 

PoflrLevel 

PhffaeTMR 

PhaSeTime 

MaijtSpeed 



.equ 20H 



. equ 



.equ 



. equ 


r-Pi 

ru 




• equ 


r 1 

■L J. 




. equ 


L j. L 




. eq u 


rz 




. equ 


L -0 




.equ 


Z.L.C. 




r 4 






. equ 


X o 




. equ 






. equ 


r ± u 




. equ 


n. 




. equ 


riiu 




. equ 


T I M£R 


(cKUu tr + U 


. equ 


TIMEF 


GRO*J P-*~ - 


. equ 


T ZMEF 


GRO'J r ■*■ C 


.equ 


TIMER 


GROUP -^2 


. equ 




A ^ L/ -T > — J 


.ecu 


timer" 


"GROUP- 2 


TIMER_ 


GROjpf" 


4 


.equ 


TIMER 


J3ROUP+S 


. equ 


timer" 


GROUP+6 


.equ 


timer" 


"GROUP+7 


. equ 


TIMEF_ 


"group-*- e 


• equ 


TIMER^ 


_GROUP+S 


. ecu 


tikef" 


GROVP-IC 


. equ 


TIKEF._ 


GROUr-i-il 


.equ 


timer' 


GROUPS 10 


.equ 


TIMER 


GROUP+12 


. equ 


TIMER 


GROUP+I3 


. equ 


TIMER 


GROUF*! 4 


,eq« 


TIMER 


GROUP -15 



Number to divide by 



Current step in 20-step phase ramp-up" 
Timer for turning on and off phase control 
Current time reload value for phase timer 
Maximum speed for this kind of door 



; LEARN EE 


GROUP FOR 


LOOPS 




LEARNEE_GRF 


. equ 


3 OH 




TEMPK 


. equ 


LEARNE 


E GR? 


TEMFL 


. equ 


LEARK E 


E GPF-I 


F2K SHADOW 




.ecu 


LEARNEE_GRPf 2 


LEARN DE 




. equ 


LEARNEE_GRP+3 


LEARNT 




.equ 


LEARNEE_GRF- 4 


ERASET 




.equ 


LEARNEE_GRP J -5 


MTEMPH 




. equ 


LEARNEE_GRP+6 


MTEMFL 




.equ 


LEARNEE_GRF-7 


MTEMP 


. equ 


LEARN EE_GR P + 8 ; 


SERIAL 




. equ 


LEARNEE_GRP J -9 


ADDRESS 




.equ 


LEARNEE_GRP* 1 0 


ZZWIN 


. equ 


LEARNEE_GRP+11 


T0_OFLOW 




. equ 


LE ARNEE_GR P+ 1 2 


TOEXT 


. equ 


LEARNEE_GRP+ 1 3 ; 


toe::tword 




. equ 


LEARNEE_GRP+12 


T125MS 




. equ 


LEARNEE_GRP+14 


SKIPRADIO 




. equ 


LEARNEE_G?P+15 


temph 


. equ 


rO 


r 


te-pl 


• equ 


y ' 


t 


learndb 




■ e 5- 




learnt 




. equ 


r4 


eraset 




. ecu 


r5 


mtemph 




.equ 


r€ 



; Readable shadow of P2K register 
; learn debouncer 
; learn timer 
; erase timer 
memory temp 

; memory temp 
memory temp 

; data to 4 from nonvol memory 
; address for the serial nonvol memo: 
radio 00 code window 

; Third byte of TO counter 
tO extend dec'd every TO int 
Word-wide TO extension 
125mS counter 

flag to skip radio read, write if 
learn or vacation talking tc it 



learr. debouncer 
learn timer 
erase timer 
memory temp 
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c 



mtempl 




. equ 


r7 


mtemp 


. equ 


r8 




serial 


. equ 


r9 


rlO 


address 




. equ 


zzwin 


. equ 


rll 




tO_oflow 




.equ 


rl2 


tOext 


. equ 


rl3 




tOextword 




. equ 


rrl2 


t 125xs 




. equ 


rl4 


skipradio 




. equ 


rl5 



; memory temp 
memory temp 

data to and from nonvol mem 

; addr for serial nonvol memory 

; Overflow counter for TO 
tO extend dec'd every TO int 
; Word-wide TO extension 
; 125mS counter 

; flag to skip radio read, write if 
; learn or vacation talking to it 



rORufc. bKUUr 




. equ 


4 OK 


dnf or ce 






rO 


"upf or ce 




equ 


rl 


loopreg 




. equ 


r 3 


up force_hi 


equ 


r h 




up force_lo 


equ 


X D 




up force 




. equ 


rr 4 


dn force hi 


equ 


T f 




dn force_Io 


equ 






dr.Lf crce 






rrfc 




equ 


rc 




f oasee_add_lc 


equ 


■>- Q 

r y 




f oice_add 




. equ 


r r c 


upf4 err.p 




. equ 


rlC 


dn^temp 




.equ 


rll 


pcffei count 




. equ 


ri2 


f oJ|:e_temp_c f 


equ 


rl 3 




f oic e _t emp_h 1 


equ 


r!4 




f cEce_temp_l o 


equ 


rl5 




DIVORCE 




. equ 


4GK 


UUFDRCE 




. equ 


41H 


ACgSTEST 




.equ 


42K 


idgpReg 




.equ 


4 3H 


UFWFORCE_KI 


.equ 


4 4K 




UEZFORCE LC 


. equ 


4 5K 




Dlf=f-ORCE_K: 


.equ 


4£K 




DN"V0RCE_LG 


. eq- 


4~K 




UP TEMF 




. equ 


4 AH 


DNJTEMF 




. equ 


45H 


POT_COUNT 




. equ 


4CH 


FORCE_TEKF_OF 


. equ 


4 CK 




force tek?_k: 




.equ 


4EK 


FORCE TEKF LO 




. equ 


4FH 



RPM GROUF 



50H 



rtypes2 
stackf lag 
rpm_temp_of 
rpm_temp_hi .equ 
r pm_t emp_h i w o r d 
rpm_t emp_l o . e qu 
rpm_past_hi 
rpm_past_lo 
rpr._period_hi 
rprr._perioc_ic 
divcounter 
rp-_ccur.t 
rp~ time cut .equ 



equ 
equ 



. equ 
. ecu 
. equ 
r3 

. equ 

r4 
r5 
r6 
. equ 
.equ 
. eau 



rO 
rl 
r2 

rr2 



rE 
rll 



Counter for dividing RPK time 



RTypes2 
STACKFLAC 



. equ 
. equ 



P?K GRO'JF- 
R?M _ GRO T 0P-i 
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RPM TEMP_OF 




. equ 


RPK GROUP+2 


RPM TEMP_HI 


equ 


RPM_GR0UPt3 


RPM_TEMP_HWORD 




.equ 


RPM_GR0UP+2 


RPM_TEMP_LO 


equ 


RPM GROUP+4 


RPM PAST_HI 


equ 


RPM_GROUP+5 


RPM PAST_LO 


equ 


RPM GROUP+6 


RPM PERIOD HI 




.equ 


RPM GROUP+7 


RPM_PERIOD_LO 




. equ 


RPM GROUF+8 


DN LIMIT_HI 




. equ 


RPM GROUP+9 


DN LIMIT_LO 




. equ 


RPM_GROUF+10 


DIVCOUNTER 




. equ 


RPM GRO'JF-11 


RPM FILTER 




.equ 


R?M_GROVP-ll 


RPM COUNT 




. equ 


RPM GRO'JF+12 


RPM_TIME_OUT 


equ 


RPM GROUP+13 


BLINK_HI 




. equ 


RPM_GR0UP-14 


BLINK LO 




. equ 


RPM GROUP-15 


BLINK 




. equ 


RPK_GR0'JP+14 



J 



; Overflow for RPM Time 
; High word of RPM Time 



Counter for dividing RPM time 

DOUBLE MAPPED register for filtering signal 



Blink timer for flashing the 
about-to-travel warning light 
Word-wise blink timer 



.-**** + + **** + * + 


* •* * ■* * 




** + *■★****♦ + *** 


; RADIO GRO'JF 








.****** * » 


* * * ■* * 






RadicGr cut 


eq~ 






RTjpfnp 




. equ 


RadioGrcup 


RTgfnpH 


equ 


RadioG 


roup-1 


RT=empL 


equ 


RadioG 


roup J -2 


R'jypbeAK 




. equ 


RadioGrcup+3 


RlijneAL 




.equ 


RadioGroup*4 


RlimelK 




.equ 


RadioGrcup-5 


RTjjmelL 




. equ 


RadioGroup-€ 


RaSiolK 




. equ 


RadicGrcup-7 


RaifioiL 




. eq- 


RaaioGroup+E 


RgdioC 


. equ 


RaaioG 


roup- i 


PsinterF. 




. eq - 


RaaioGroup-lC 


p4interL 




.equ 


RaaioGroup+ll 


AddValueK 




. equ 


RadioGroup+12 


AdiivalueL 




.equ 


RadioGrcup- 1 3 


R#§io3H 




. equ 


RadioGroup-14 


Rsedic3L 




. eq_ 


RaaicGrcup-lE 


r|llmp 




. eq; 


r C 


rtiir.ph 


. equ 






rtempi 


. equ 


r2 




r time ah 




. eq_ 




rtimeal 




. eqj 


r4 


rtimeih 




. ecu 


it 


rtimeil 




. eq- 




radiolh 




. equ 


z~ 


radioll 




. equ 


r6 


radioc 


. equ 


r& 




pointerh 




.equ 


riC 


pointerl 




. equ 


r 1 1 


pointer 




.equ 


rrlG 


addvalueh 




. equ 


r!2 


addvaluel 




.equ 


r!3 


radio3h 




. equ 


rl4 


radio31 




.equ 


rl5 


w2 




. equ 


rr i 4 



; radio temp storage 
radio temp storage high 
radio temp storage low 

radio active time high byte 
radio active time low byte 
radio inactive time high byte 
radio inactive time low byte 
sync 1 code storage 
sync 1 code storage 
radio word count 



sync 3 code storage 
sync 3 code storage 

; radio temp storage 
radio temp storage high 
radio temp storage low 

radio active time higr. byte 
radio active time low byte 
radio inactive time high byte 
radio inactive time low byte 
sync 1 code storage 
sync 1 code storage 
radio word count 



Overall pointer for ROM 



sync 3 code storage 
sync 3 code storage 
For Siminor revision 



Count erGroup 


. equ 


C n Ch 




TestReg 




. e q - 


Cour.terGreup 


BitMask 




. eqj 


Ccur.terGrcup+Ci 


LastKatc'r. 




. eq- 


Cc ur.ter Group- Z 2 


LocpCcunt 




. equ 


Cour.terGrcup-C3 


Counter A 




. equ 


CounterGroup+04 


Counters 




. equ 


Cour.terC-rcup-C5 


Counter C 




. equ 


CounterGroup-0 € 



counter group 

Test area when dividing 

Mask for transmitters 
last matching ccae acares 
loop counter 
counter translation MSB 
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} 



Count erD 
MirrorA 
MirrorB 
MirrorC 
MirrorD 
COUNT 1H 
COUNT 1L 
COUNT 3 H 
COUNT 3 L 



. equ 
. equ 
. equ 
. equ 
. equ 
. equ 
. equ 
. equ 
. equ 



CounterGroup+07 
CounterGroup+08 
CounterGroup+09 
Count erGr oup+ 010 
Count e rGr oup+ Oil 
CounterGroup+012 
CounterGroup+013 
CounterGroup+014 
CounterGroup+01 5 



J 



counter translation LSB 
back translation MSB 



back translation LSB 
received count 



loopccunt 




. equ 


r3 






counters 




. equ 


r<3 






counterb 




• equ 


r5 






counterc 




.equ 


r€ 






counterd 




.equ 


rl 






Biirrora 




.equ 


r6 






nirrorb 




. equ 


r9 






mirrorc 




. equ 


rlO 






ir.irrord 




.equ 


ril 






Radio2Group 




. equ 


08 OK 






PREVFIX 




. equ 


Radio2Group 




0 


PRT.yj'wp 




. equ 


Radic2Group 




- 


ROliBIT 




. equ 


Raaic2Group 




2 


RTimeDB 




. equ 


Radic2Group 


+ 


3 


RTKieDL 




.equ 


Radio2Grcup 




4 


RT-jjfieFK 




. ecu 


Radic2Grcup. 


+ 


5 


RTdmeFL 




. equ 


Radio2Group 




6 


idtB 




.equ 


Radio2Group 


+ 


1 


svf% 




. equ 


Radio2Group 


+ 


8 


RftftOBIT 




. equ 


Radio2Group 


4- 


c 

y 


RaidM. oT ime Out 


. equ 


Radio2Group + iu 






RadioMode 




.equ 


Raa^o^Gr oup 






Bi~t.Th.resh 




. equ 


Raaio2Grcup 




12 


SyLncThresh 




.equ 


Radio2Group 


+ 


13 


MSb&Bits 




. equ 


Radio2Grcup 


+ 


14 


Rfyag 




. equ 


Radic2Group 


■t- 


15 






.equ 








pi'eVtrr.p 




. equ 








rSJlbit 




. equ 


r 2 






id b 




. equ 








svo_t 




. eq- 








radiobit 




. eq_ 


r & 






radictimeout 


. equ 


rlC 








radiomcde 




. equ 








rf lag 




. eq_ 


ri5 







; Fixed or rolling mode 

;Bit decision threshold 

; Sync pulse decision threshold 

.•Maximum number of bits 

;Radio flags 



OrginaiGroup 
SW_DATA 
ONEP2 
LAST CMD 



CodeFlag 



.equ 



RPMOKES 
RPH CLE Ar- 



SOn 
.equ 
. equ 
. equ 



OrginalGrcup~0 
OrginaiGroup+i 
OrginalGroup+2 



.equ OrginalGroup+3 



.eq_ vji gir.a^^r cup^ <j 
.equ OrginalGr cup* 5 
.63. C r c -T.a '- Gr c_p- € 



1.2 SEC TIMER TICK .125 

LAST COMMAND FROM 

= 55 WALL CONTROL 

= 00 RADIO 

Radio code type flag 

FF = Learning open/close/stop 

11 = b code 

AA = open/close/stop code 

55 = Light control transmitter 

0C = Command cr unknown 
RPM Pulse One Sec. Disable 
RPM PULSE CLEAR & TEST TIMER 
RPK FORCED AREV FLAG 
86H FOR A FORCED REVEPSE 



FLASH_FLAG 
FLASH DELAY 



.equ OrcinalG: 
Cr a-naiGrcuD- 6 
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REASON 


.equ 


OrginalGroup+ 9 








• equ 






RadioTypes 




. equ 


Orgi nalGroup+ 1 1 


i i y ucs xwj. uiic kjl la o 


Llurii r JuAb 




. equ 


UlylllaiOXU li£J~ X 








. equ 










» equ 










. equ 






NextGr oup 




. equ 


C\"L. OP 




SDISABLE 




. equ 


NextGroup+O 




PRADI03H 




. equ 


NextGroup+1 ; 


3 mS code storage high byte 


PRADI03L 




. equ 


NextGr cup-*- z ; 


3 mS code storage low byte 


PRADI01H 




.equ 


Next.Gr oup"^ 3 ; 


1 inS code storage high byte 


PRADI01L 




. equ 


NextGr oup+ 4 ; 


1 iuS code storage low byte 


FTO 




. equ 


NextGroup+5 ; 


radio time out 


;RFlag 




.equ 


NextGr oup* 6 ; 


radio flags 


EnableWorkLight 


.equ 


NextGroup+ 6 


;4—22—97 work light function on or off? 


RINFILTER 




. equ 


NextGroup-7 ; 


radio input filter 


1IGHT1S 




. equ 


NextGroup+8 ; 


light timer for Isecond flash 


DOG 2 




. equ 


NextGroup+9 ; 


second watchdog 


FAULT FLAG 




. equ 


NextGroup-- 2 0 7 


flag for fault blink, no rad. blink 


MOT DEL 




.equ 


NextGroup* 1 I ; 


inotor tine delay 


pillNT DEB 




. equ 


NextGrcup-12 ; 


Pass Point debouncer 


deJJayc 




.equ 


NextGroup* 1 3 ; 


for the time delay for command 


11 C 




. equ 


NextGroup+ 1 4 ; 


Limits are changing register 


OAR 




. equ 


NextGroup+1 5 ; 


Counter compare result 


ba¥kuf grp 




. equ 


OBOK 




PiihSunterA 




. equ 


BACKL? GRf 




PdSunterB 




.equ 


BACKUF GRP+I 




PCjunterC 




.eq- 


BACKUP wP+<: 




PCounterD 




. eq ji 


BACKUP GRP*3 




HOUR TIMER 




.equ 


BACKUF GRF-4 




Hib&R TIMER HI 


.equ 


BACKUP 


GRP+4 




Hg$R_TIMER_LO 


. equ 


BACKUF 


GRP+5 




PsssCounter 




. equ 


BACKUF GRP* 6 




S3!&CKREAS0N 




. equ 


BACKUF GRP+7 




F%tstRun 




. equ 


BACKUF_GRP*S 


Flag for first operation after power-up 


Mi#.Speed 




. equ 


BACKUF GRP*& 




gK;PM_COUNT 




.equ 


BACKUF GF.r-2 0 




BRPM_T IME_OUT 




. equ 


BACKUP GRP- 11 




BFORCE_IGNORE 




.equ 


BACKUP GF.F-12 




BAUTO_DELAY 


. equ 


BACKUF 






BCMD DEB 




.equ 


"BACKUF GRF-14 




BSTATE 




.equ 


BACKUP_GRF*1£ 




; Double- 


■mapped regis 


ters for M6SCC test 




COUNT_HI 




.equ 


BRPM__COUNT 




COUNT_LO 




. equ 


BRPM TIME OUT 




COUNT 




.equ 


BFORCE IGNORE 




REGTEMP 




. equ 


BAUTC DELAY 




REGTEMF2 




.equ 


BCKC_DEE 




; Double- 


-mapped regis 


ters for Siir.incr Code 


Reception 


CodeTO 


.equ 


COUNT 1L ; 


Binary radio code received 


CodeTl 


. equ 


RadiolL 




CodeT2 


. equ 


MirrorC 




CodeT3 


. equ 


MirrorD 




CodeT4 


. equ 


COUNT 3H 




CodeTE 


. eq- 


count: 






Ix 




.equ 


COUNT 1H 


; Index per Simir.or's code 


KlHigh 


. equ 


AddVe I 


.ueH ; 


: Word 1 per Siir.inor's ccae 


WILow 




.equ 


AddValueL 


; description 


wlhigh 


. equ 


addva] 


Lueh 




wl low 




. equ 


adavaluel 
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• c4u 


Radio3H 


W2Low 




.equ 


Radio3L 


w2high 


. equ 


radio3h 


w21ow 




. equ 


radic31 


STACKTOP 




. equ 


238 


STACKEND 




. equ 


OCOK 


RS232IP 




. equ 


PO 


RS232IK 




.equ 


SWITCHES! 


csh 




. equ 


10000000E 


csl 




. equ 


-csh 


clockh 




. equ 


01000000B 


clockl 




.equ 


-clockh 


doh 




. equ 


00100000B 


dol 




.equ 


~doh 


ledh 




. equ 


OOOCOOiOE 


ledl 




. equ 


~ledh 


psmask 




. equ 


0100GOOOB 


csport 




. equ 


P2 


dioport 




. equ 


P2 


clkpcrt 




. equ 


P2 


Import 




. equ 


P2 


Pll ort 




. equ 


P2 


W##CHDOG_GROU 


P 


.equ 


OFH 


pfy»n 




. equ 


rO 


S85=E 




. equ 


rll 


wdrEinr 




. equ 


rl5 


; =" . I F 


TVcTh 




ree 



.macro 
.byte 5fh 
. en dm 

. ELSE 

.r.acrc 

xc: FI, #: 
. er.dm 

. EN3I F 



Word 2 per Siminor's code 
; description 



start of the stack 
end of the stack 

RS232 input port 
RS232 mask 

chip select high for the 93c 
chip select low for 93c4 6 
clock high for 93c4€ 
clock low for 93c4 6 
data out high for 93c4 6 
data out low for 93c4 6 
turn the led pin high "off 
turn the led pin low "on 

mask for the program switch 
chip select port 
data i/o port 
clock port 
led port 

program switch port 



Kick external wat 



FILL 



.rr.acrc 
.byre OFFh 
. endir. 



FILL1C .macro 
FILL 
FILL 
FILL 
FILL 
FILL 
FILL 
FILL 
FILL 
FILL 
FILL 
. er.i~ 



FILL10 

fill:: 

Page 22 of 97 




i. 0 

FILLIO 
FILLIO 
FILLIO 
FILLIO 
FILLIO 
FILLIO 
. endm 

FILLIOOO .macro 
FILLIOO 
FILLIOC 
FILLIOO 
FILLIOO 
FILLIOO 
FILLIOO 
FILLIOO 
FILLIOO 
FILLIOO 
FILLIOO 
. endm 

TRAP '.macro 

jp start 

Ul j p start 

=U jp start 

fp jp start 

7— jp start 

~. . en dir. 

TRMf 1 : .macro 

!== TRAP 

£ TRAP 

Ui TRAP 

5 ' TRAP 

" TRAf 

H TRAP 

Q TRAP 

fTs TRAF 

IT TRAF 

M TRAF 

O . endir. 



SetRpTcRadic2Group .macro 
.byte C31H 
.byte OS OK 

. endm 



* 

* Interrupt Vector Table 



.org OOOOH 

.IF TwcThirtyThree 



word 


RADIO INT 


IRQO 






word 


000CH 


IRQl, 


P3 


3 


word 


RPK 


1RQ2, 


P3 


1 


word 


AUX_OBS 


•IRQ3, 


P3 


0 


were 


TIMEF.V1 


IRQ-4 , 


rri r- 




were 


RS222 


IRQ5, 


Tl 





. wcra 
. were 
. word 



RADIO_INT 
RA2CO_INT 
RPH 



; IRQO 

; IRQl , P3 . 2 
;IRQ2, P3.1 
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1 



.word AUX_OBS 
.word TIMERUD 
.word 000CH 



IRQ3, P3.0 
IRQ4, TO 
IRQ5, Tl 



. ENDIF 



.page 

.org OOOCH 
jp START 



;jmps to start at location 0101, 0202 etc 



RS232 DATA ROUTINES 
RS_COUNTER REGISTER: 

00O0XXXX - 0011XXXX Input byte counter (inputting bytes 1-4) 
OOXXOO00 Waiting for a start bit 

00XX0001 - XXXX1001 Input bit counter (Bits 1-9, including stop) 
00XX1111 Idle — whole byte received 

1000XXXX - 1111XXXX Output byte counter (outputting bytes 1-8) 
1XXXO00C Tell the routine to output a byte 

1XXX00C1 - IXXXIOC: Outputting a byte (Bits 1-9, including stop) 
1XXX1111 Idle -- whole byte output 



OuiputKode : 



tir. 



tor 



RS_COUNTER, *00CC1I115 
z, OutputStart 

RS_COUKTER, #OOCC10C15 
z, OutputStop 



; Check for outputting start bit 



; Check for outputting stop bit 
(bit 9), if so, don't increment 



CSTfputDat a : 

-fil S C f 
rrc 

OgtputLow: 



RS232DAT 
c, OutputK: 



; Set carry to ensure high stop bi 
; Test the bit for output 



cr 
1- 

OutputStart 

Id 

Id 

and 

or 

in r 

iret 



- — / 

DataBitCor.e 



Ti, #Rs?erFuli 
TMR, #0C0C1110E 
p3, #-CKARGE_SW 
F3, #DIS_SK 
RS COUNTER 



Turn off the pull -up 
Turn on the pull -down 



; Set the timer to a full bit period 
Load the full time period 
Send a start bit 

Set the counter to first bit 



OutputHigh : 

and 
or 



p3, #~CIS_SK 
P3, # CHARGE SW 



; Turn off the pull-down 

; Turn on the pull-up 



DataBitDcne : 



in c 
iret 



Advance to the next aata tit 



and p3, #~DI3_SV." 
or P3, # CHARGE SK 



Output a stop (high* bit 
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) 



or 
cp 
jr 
clr 

MoreOutput : 

RSExit : 

iret 



RS_COUNTER, #00001111B 
RS_COUNTER f #1111111 IB 
nz, MoreOutput 
RS COUNTER 



; Set the flag for word being done 

; Test for last output byte 

; If not, wait for more output 

; Start waiting for input bytes 



RS232: 



cp RsMode, #00 

jr nz, InRsMode 

cp STATUS, # CHARGE 

jr nz, WallModeBad 



; Check for in RS232 mode, 
; If so, keep receiving data 

; Else, only receive data wher 
; charging the wall contol 



InRsMode : 



tor. RS_COUNTER, #000C1111E 

jr 2, RSExit 

to. RS_COUNTER, #11000000E 

jr nz, OutputMode 



; Test for idle state 

; If so, don't do anything 

; test for input or output mode 



RS Street : 
f?i tin 



RS_COUNTER, #000 Oil HE 
z, WaitForStart 



Check for waiting for start 
If so, test for start bit 



tern 
jr 



RS_COUNTER, #00001001E 
z, StopBit 



Test for receiving the stop bit 
If so, end the word 



scf 

to 



D rcf 
GdflksBit : 



RS232IP, #RS232IM 
nz, GctRsEit 



' ; Initially set the data in bit 

; Check for high or low bit at inpt 
high, leave carry high 

; Input bit was low 



mc 
i ret 



RS2 32DAT 
RS COUNTER 



; Shift the bit into the byte 
; Advance tc the next bit 



StopEit : 



trr. 
jr 



RS232IF, #RS: 
z , uataBac 



; Test for a valid stop bit 

; If invalid, throw out the word 



DataGood : 



IsData : 



to 
jr 
Id 

or 

iret 



RS_COUNTER, #11110 00 Or 

nz, IsData 

RS COMMAND, RS 2 32 DAT 

RS COUNTER, #0 00011115 



; If we're not reading the first wo 
; then this is not a command 
Load the new command word 

; Indicate idle at end of word 



WallModeBad: 



cir 



RS COUNTER 



; Reset the RS232 state 



DataBad : 



ana 
ire: 



RS COUNTER, # DC HOOCOE 



; Clear the byte counter 



WaitForStart : 



R5232I?, #RS232IK 



; Check for a start bit 
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J* 

inc 
Id 
Id 
Id 

iret 



nz, NoStartBit 

RS_COUNTER 
Tl, #RsPerlP22 
TMR, #00001110E 
Tl, #RsPerFull 



0 



0 



; If high, keep waiting 

; Set to receive bit 1 

; Long time until next sample 

; Load the timer 

; Sample at IX afterwards 



NoStartBit : 
Id 

iret 



Tl, #RsFerHalf 



; Sample at 2X for start bit 



Set the worklicht timer to 4.5 minutes for 60Hz line 
and 2.5 minutes for 50 Hz line 



SetVarLight : 
cp 
jr 

USALight : 

Id 
Id 

j— H ret 

EuTSbLight : 

rf ld 
y ^ id 

if I ret 



LinePer, #36 
uge, EuroLight 



; Test for 50Hz or 60Hz 

; Load the proper table 



l:ght_timer_h: , #usa_light_ki 
light_time?_lg, *"sa_ligkt_lo 



LIGHT_TIMER_KI , #EURO_LIGKT_HI 
LIGHT TIME? L0,#EURC LIGHT_LO 



set the light period 
Return 

set the light period 
Return 



THIS THE AUXILARY OBSTRUCTION INTERRUPT ROUTINE 



A T 0X_OBS : 

":~ and 
O Id 

ni ° r 

f=j; and 
IS. iret 



OBS_COUNT , * 1 1 
imr, tllilOlllb 
AOBSTEST, #11 
AOBSF, #O0OOCC10B 
AOBSF, #11C11111E 



; reset pulse counter (nc obstruction: 
; turn off the interupt for up to 500uS 
reset the test timer 

; set the flag for got a aobs 
; Clear the bad aobs flag 
; return from mt 



Test for the presence 



r_ir.xer rr.cau-e 



LockFor Flasher : 

and p2m_shai:ovc, # ~blik:-"_?ii: 

Id P2K , P2K_SHA0CW 

or F2, #blink_fi:: 

or P2K_SHADOW, #5LINK_FIN 

Id P2K, P2K_SHADOK 

ret 

; Fill 41 bytes of unusea memory 

FILL10 
FILL 10 
FILL10 
FILL10 
FILL 

.tr****************************************'' 

; REGISTE? INITILIZATION 



Set high for autoiatch test 



Look for Flasher module 



******** 



********************* 



start : 
START: di 



; address has both bytes the 
; turn off the interrupt for init 



. IF 



TwoTmrtyTnree 
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Id RP,#WATCHDOG_GROUP 
Id wdtmr, #00001111B 



; rc dog lOOmS 



.ELSE 

cli 

.ENDIF 



PI 



WDT 
clr 



RP 



; kick the dog 

; clear the register pointer 



**■*■************************************************ + *************** + * + ** 



PORT INITILIZATION 



Id 


P0,#PD1S INIT 


; RESET all ports 


Id 


P2,#P2S POR 


; Output the chip ID code 


Id 


P3,#P3S INIT 




Id 


P01K, #P01M_IKIT 


; set mode p00-p03 out p04-p01 in 


Id 


F3K, #P3M_INI7 


; set port3 p30-p33 input analog 






; p34-p37 outputs 


id 


P2K, #F2M_FOR 


; set port 2 mode for chip ID out 



Jfiternal RAM Test and Reset All RAM '= ir.S * 



It***-**-** 



== SJ -p 

JG Id 
writif _again: 

1 ~ WDT 

wri?t%_againl 
p Id 

m c p 

jr 

~ rl 
O jr 
O clr 

inc 

cp 

j r 



#0F0h 
rl5, #4 



rl4 , #1 

@rl5, rl4 

rl4,<?rl5 

ne, systerr,_error 

rl4 

nc, wr ite_agair.l 

@ri5 

rl5 

rl5, #24C 

ult , write asa;r. 



; point to control group use stack 
;rl5= pointer (minimum of RAM) 

; KICK THE DOG 



.-write 1,2,4,8, 10,20, 40, 80 
;then compare 



; write RAM(r5)=0 to memory 



.******************* 

;* Checksum Test 

.-******************* 



t ****** i 



r****************** 



******************** 



CHECKSUMTEST : 
srp 
Id 
Id 

add_sum: 

WDT 

ldc 

add 

decw 

jr 

cp 

j r 

system_error : 
ar.o 
j r 



#CKECK_GRF 
test_adr_hi, #01FH 
test adr lo,#0FFH 



roir._data, @test_adr 
check_sum, rom_data 
test_adr 
nz, add_sum 

check_s-urr., # check_sur-_ 
z , systerr._ck 

ledpcrt, #ledl 
svsterr. error 



; maximum address=fffh 

KICK THE DOG 
read ROM code one by one 
add it to checksum register 
increment ROM address 
address=0 ? 

cneck final checksum = 00 ? 

D tc indicate fault 



or. the 



. byte 
systeir._ok : 



25€-check sur value 
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WDT 

1 d STACKEND , # S TACKTOP 
SETSTACKLOOP : 

Id 8 STACKEND, #01H 

dec STACKEND 

cp STACKEN D , # S TACKEN D 

jr nz, SETSTACKLOOP 



0 



; kick the dog 

; start at the top of the stack 

; set the value for the stack vector 
; next address 
; test for the last address 
; loop till done 



CLEARDONE : 



Id STATE, #0€ 

Id BSTATE,#06 

Id OnePass, STATE 

Id STATUS, # CHARGE 

Id SWITCH_DELAY, #CM2_DEL_EX 

Id 12GHT_TIMER_H1, #USA_LIGHT 

Id LIGHT_TIMER_LO,#USA_LIGHT~ 

Id RPMONES,#244 

srp #LEARNEE_GR? 

Id learndb, #0FFK 

Id zzwin, learndn 

la CML_DEE, learner 

Id BCMD_DEB, learndb 

Id VAC_DEB, learndb 

Id LIGKT_DEE, learndb 

Id ERASET, lea mat 

la learnt , lea mar 

Id RTO, learndb 

Id AUXLEARNSK, learndb 

Id RRTO,learndc 



; set the state to stop 

; Set the one-shot 

; set start to charge 
; set the delay time to cmd 
HI ; set the light period 

LO ; for the 4 . 5 min timer 

set the hold off 

set the learn debouncer 
turn off the learning 

in case of shorted switches 
in case of shorted switches 



; set the erase timer 
; set the learn timer 
; set the radio time out 

turn off the aux learn switch 

set the radio timer 



SSACK INITILIZATION 

clr 254 
D Id 255, #236 

ft .IF TvcTr.i r t yTnree 
S . ELSE 
~ clr PI 

.ENDIF 



; set the start of the stack 



TIMER INITILIZATIOK 



Id PREO, #000001C1B ; set the prescaler to /I for 4MHz 

Id PRE1, #00010011E ; set the prescaler tc /4 for 4MHz 

clr TO ; set the counter to count FF through 0 

Id Tl , #RsFerHalf ,• set the period to rs232 period for start bit sample 

Id TMR,#00001111B ; turn on the timers 



PORT INITILIZATION 



Id PO, #P01S_INIT 

Id P2,#F2S_INIT 
Id P3,#P3S_INIT 
Id P01M,#P01K_INIT 
P3K, *F3!-:_IK:7 

1c F2K_SKADOVC, t?2K_IK:7 



RESET all ports 



; set mode p00-p03 out p04-p0"?in 
; set port3 p30-p3 3 input analog mode 
; p34-p3"7 outputs 
; Shadow V2K for read ability 
set port 2 mode 



. I F 
. ELSE 
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clr PI 
. ENDIF 



; READ THE MEMORY 2X AND GET THE VAC FLAG 



Id SKIPRADIO,#NOEECOMK 

Id ADDRESS, #VACATIONADDR 

call READMEMORY 

call READMEMORY 

Id VACFLAG, MTEMPri 



; set non vol address to the VAC flag 

; read the value 2X IX INIT 2ND read 

; read the value 

; save into volital 



WakeUpLimits : 



Id 


ADDRESS, #UPLIMADDR 


; Read the up and 


call 


READMEMORY 




Id 


UP_LIMIT HI, MTEMPK 




Id 


UP LIMIT LO, MTEKFL 


, 


Id 


ADDRESS, #DNLIMADDR 




call 


READMEMDPY 


; 


Id 


DN LIMIT HI, MTENPH 


; 


Id 


DK LIMIT LC, MTEMFL 


; 


WD! 




; Kick the 



o 

01 

WakfPpState 

W 
u 

3 

M: 
O 

KaEMUpLost : 

ri Id STATE, #STOF 

~ id pos:tiok_ki, #o~fk 

? =f Id POSITIOK_LC, #06DH 

O jr GotKakeVp 



Id 


ADDRESS, #LASTSTATEADDR 


; Read the previous operating 


call 


READMEMORY 


; 


Id 


STATE , MTEMPL 


; Load the state 


Id 


PassCounter, MTEMPK 


; Load the pass point counter 


cp 


STATE, #UF_POSITION 


; If at up limit, set position 


jr 


2, WakeUpLiir.it 


; 


<=p 


STATE, #DK_FOSITIO;: 


; If at dcwr. limit, set position 


jr 


z, WakeDriliir.it 


; 



; Set state as stopped in mid travel 
; Set position as lost 



■KakeUpLirr.it : 
id 
Id 
jr 



positiot;_k:, yf_lik:t_h: 
positiok_lc, uf_likit_lc 
GotKake'Jp 



; Set position as at the up iimj 



■WakeDnLirr.it : 
Id 
Id 



POSITION_HI, DN_LIMIT_HI 
POSITION LC, DK LIMIT LG 



; Set position as at the down limit 
; 



GotWakeUp: 

Id 

Id 



ESTATE , STATE 
OnePass, STATE 



; Back up the state and 

; clear the one-shot 



; SET ROLLING/ FIXED MODE FROM NON-VOLATILE MEMORY 



; 1 



call 

jr 



SetRadioMode 
SET INTERRUPTS 



; Set the radio mode 

; Ccr.tir.ue or. 



SetRadioMode: 



Id SKIPRADIC, #NCEECO> 

Id ADDRESS, #MODEADDR 

call READMEMDPY 

Id RadioMode, MTEMPL 



; Set skip radio flag 
; Point to the radio mode flag 



; Read the radic mode 

; Set the proper radio mode 
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clr 


SKIPRADIO 


i 


Re-enable the radio 




tm 


RadioMode, #R0LL_MASK 


r 


Do we want rolling numbers 




jr 


n 7 ^t- a ri-Rnl "1 

Ll£. f U Lai 








call 


FixedNums 








ret 








StartRoll : 










call 


KOJ. INUIHS 








ret 








; INITERRUPT 


INITILIZATION 






SET INTERRUPTS 


: 








Id 


1PR, #000110105 


; 


set the priority to timer 




Id 




; 


turn on the interrupt 




. IF 


TwoThirtyThree 








Id 


IRQ, #010000008 


; 


set the edge clear int 




. ELSE 










Id 


irq, #oooeo:ooc 


; 


Set the edge, clear ints 


o 


. ENTI F 






m 










-01 


ei 




; 


enable interrupt 


;^ 










;We 


SET SYSTEM REG 




































li 




.IF TwoThirtyThree 






H 


Id 


RP,#WATCHDOG GROUP 






0 


Id 


smr, #00100C10B 


; 


reset the xtal / number 


ru 


Id 


peon, #011111103 


; 


reset the peon no comparator 








; 


no low emi mode 


o 


clr 


RF 


; 


Reset the RP 


O 










Q 




.EKDIF 








Id 


PRE \j t ^ C C u J u j. u 2 r 


; 


set the prescaler to / 1 fcr 




KZ~ 




; 


Kick the dog 



; KAIK LOOF 



MAIN LOOP: 

cp 
jr 



PrevPass, PassCounter 
z, FassPcmtCurrent 



PassPointChanged : 



/Compare pass point counter to backup 
;If equal, EEPROM is up to date 



Id 
Id 

call 

di 

Id 

Id 
e: 
call 
clr 



SKIPRADIO, #NOEECOMM 
ADDRESS, # LASTSTATEADDR 
READMEMORY 

MTEMPH, PassCounter 

PrevPass, PsssGcur.ter 

WRITEMENORY 
SKIFRAZIC 



; Disable radio EEPROM communications 

; Point to the pass point storage 

; Get the current GDO state 

; Lock in the pass point state 
; Store the current pass point state 

; Clear the one-shot 
; 

; Write it back to the EE FROM 



FassPomtCurrent : 
; 

; 4-22- 9? 
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^ o 

CP EnableWorkLight, #10000000B ;is the debouncer set? if so write and 

;give feedback 

JR NE,LightOpen 

TM pO,#LIGHT_ON 

JR KZ,GetRidOfIt 

LD MTEMPL, #0FFH ; turn on the IR beam work light function 

LD MTEMPH, #0FFH 

JR CommitToMem 
GetRidOf It: 

LD MTEMPL, #00H ;turn off the IR beam work light function 

LD MTEMPH, #0 OK 
CommitToMem: 

LD SKIPRADIO, #NOEECOMK ;write to memory to store if enabled or not 

LD ADDRESS, tIRLIGHTADDR ; set address for write 

CALL WRI TEMEMORY 

CLR SKIPRADIO 

XOR pO, #WORKLIGHT /toggle current state of work light for feedback 

LD EnableWorkLight, #01100000B 

LightOpen: 

cp LIGHT_TIMEF_HI, #CFF:-: ; if light timer not done test beam, break 

jr nz, TestBeamEreak 

O t:r pO, #LIGK7_0N ; if the light is off test beam break 

yfj jr nz, LightSkip 

TesSeamBreak : 

^ trr AOBSF, fclOOOCOOOc ; Test for broken beam 

uj jr z.LightSkip ; if no pulses Staying blocked 

1=5; ; else we are intermittent 

;4-|€-97 

LP SKIPRADIO, #NOEECOKM ;Trun off radio interrupt to read from e2 

^ LD ADDRESS, #IRLIGHTADDR ; 

s CALL READMEMO? Y 

Li CLR SKIPRADic ; don't forget to zero the one shot 

H; CP MTEMPL, # DISABLED ;Does e2 report that IR work light function 

ST; JR EQ.LightSkip as disabled? IF so jump over light on and 

O cp STATE, #2 ; test for the up limit 

p jr nz, LzghtSxip ; if net goto output the code 

f==i call SetVarLight ; Set worklight to proper time 

~" or pO, *>LIGHT_0N ; tarn on the light 

LightSkip: 

; 4-22-91 

AND AOBSF, #0111111 IB ; Clear the one shot, for IR beam 

; break detect. 

t 

cp HOUF_TIMER_KI , #0ICK ; If an hour has passed, 

jr ult, NoDecremer.t ; then decrement the 

cp HOUR_TIMER_LC, #C20K ; temporary password timer 

jr ult, NoDecrement ; 

clr H0oF,_7IKER_KI ; Reset hour timer 

clr HOOR_TIMER_LO ; 

Id SKIPRADIO, #N0EECOMM ; Disable radio EE read 

Id ADDRESS, # DURA 7 ; Load the temporary password 

call READMEMORY ; duration from non-volatile 

cp MTEMPH, #H0URS ; If not in timer mode, 

jr nz, NoDecrement2 ; then don't update 

cp MTEMPL, #00 ; If timer is not done, 

jr z, NoDecrement2 ; decrement it 

dec KTEK-l ; 'Jpaate the number of hours 

call WRITEMEMORY 

MoDecremer.t : 

tm A03SF, #01000000fc ; If the poll radio mode flag is 

jr z, NcDecremer.t2 ; set, poll the radio mode 
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call SetRadioMode 

and AOBSF, #10111111b 



0 



Set the radio mode 

; Clear the flag 



NoDecrement2 : 

clr 
and 
clr 
Id 

Id 

01 
and 
Id 
cp 

cp 
jr 
Id 
jr 

M CLEAR VAC : 
clr 

SESVACCHAKGE 
clr 
U Id 
01 la 
ill Id 
{7* Id 
.rf call 
clr 
NOpACCHG : 

M= cp 
LJ i r 



ReadUpLirr.it : 

Id 
Id 

call 

di 

Id 

Id 

clr 

add 

adc 

CalcMaxLoop: 
inc 
add 
adc 

V 

J J - 

GotNa>:??cir.: 
ei 

Z" 

3* 
cp 

3? 



SKIPRADIO 
AOBSF, #0010001 lb 
DOG2 

P01M,#P01M_INIT 
P3M, #P3K_INIT 

P2M_SHADOW, #P2M_ALLINS 
P2M_SHADOK, #P2M_ALLOUTS 
P2M, P2M_SHADOW 
VACCHANGE, #0AAH 
nz,NOVACCHG 
VAC FLAG , #0FFH 
Z , MCLEARVAC 
VAC FLAG, # 0FFH 
SETVACCHAN GE 

VAC FLAG 

VACCHANGE 

SKIPRADIO, #NOEECOMK 
ADDRESS, #VACATIOKADDK 
MTEMPH, VACFLAG 
MTEMPL, VACFLAG 
WRITEMEMORY 
SKIPRADIO 

STACKFLAG, #0FFK 
nz,NOCHANGEST 

L_A_C, #0"7 0H 

uge, SkipReadLimits 

STATE, #UF_DIRECTION 
z, ReadUpLirr.it 

STATE, #DK_CIRECTIOK 
z, ReadDr.Lir.it 

SkipReadLirr.its 



Re-enable radio reads 
Clear the single break flag 
clear the second watchdog 
set mode p00-p03 out p04-p07in 
set port3 p30-p33 input analog mode 
p34-p37 outputs 

Refresh all the P2M pins which have are 
always the same when we get here 
set port 2 mode 

test for the vacation change flag 
if no change the skip 

; test for in vacation 
if m vac clear 

; set vacation 
set the change 

; clear vacation mode 

; one shot 

; set skip flag 

; set the non vol address tc the VAC flag 

; store the vacation flag 

write the value 

; clear skip flag 

; test for the change flag 
; if no change skip updating 

If we're in learn mode 

then don't refresh the limits! 

; If we are going to travel up 
; then read the up limit 



SKIPRADIO, #NOEECOKy. 
ADDRESS, #UPLIKADDR 
READMEMORY 

UF_LIKIT_KI, MTEMFH 
UP_LTMIT_LO, MTEMPL 
FirstRun 
MTEMPL, #10 
MTEMPH, #C0 

FirstRun 

MTEMPL, #LOK (PPOINTPULSES; ; 
MTEMPH, #HIGH(PPOINTPULSES) 
nc, CalcMaxLocp 



If we are going tc travel 
ther. read the down Iirr.it 

Nc limit on this travel.. 



; Skip radio EE PROM reads 
Read the up limit 



d own 



'Calculate the highest possible value for pas: 
Bias back by 1" tc provide margin of error 



; Ccur.t pass pci: 



until value goes positive 



SKI FRA-I C 

PassCounter , #C lOOOCOC'E 
z, CounterGoodl 

DN_LIMIT_KI, #HIGH I PPCINTPULSES - 351 ; If the down lirr.it is .lew 
ugt , Cour.terlsNegl ; then the counter can be negative 
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Test for a negative pass point counter 
If not, no lower bounds chec.< needed 

encugh, 



ult, ClearCount 

DN_LIMIT_LO, # LOW (PPOINT PULSES 
uge, CounterlsNegl ; 



D r 
cp 

jr 

ClearCount 
and 
jr 

CounterlsNegl : 

or PassCounter, #01111111b 
CounterGoodl : 

cp 

jr 

cp 

jr 

jr 

TestUpLimit2 : 
cp 
jr 
jr 



PassCounter, #10000000b 
CounterGoodl 



UP_LIMIT_HI, #0FFH 
nz, TestUpLir?,it2 
UP_LIMIT_LC, # C FFK 
z, LimitlsBad 
LimitsAreDone 

UF_LIMIT_HI, #0D0K 
ule, LimitlsBad 
LimitsAreDone 



ReadDnLimit : 

Id 
Id 

=== call 
id 

I Id 
yQi ei 
; ™ c 1 r 

™ cp 

3 r 

4= cp 

M= 3 r 
1 3 r 



SKIPRADIO, #NO£ECOMK 

address, #d:;limaddf 

READMEMOF Y 

DN_L I M I T_H I , MTEKPK 
DN LIMIT LC, KTEMrl 



skipraiic 
dk_lik.it_k:, #ook 

nz, TestDownLimit2 
DN_LIMI7_L0, #D0K 
z, LimitlsBad 
Lirr.i tsAreDc" e 
Te5tDownLiinit2 : 

H ; cp DN_LIMIT_HI, #02 OH 

Q: jr ult, LimitsAreDcne 
Liigi'£IsBad: 

Id FAULTCODE, *" 

Jrf call SET_ST0P_STA7E 
l==J jr LimitsAreDcne 

SkipReadLxmitf : 
LimitsAreDone : 



Id 
Id 

call 

Id 

Id 

call 
clr 

Id 

cp 
jr 



SKIPRADIO, #NOEECO!l>: 

ADDRESS, # LAST S T ATEADDR 

READMEKORV 

MTEMFH, PassCounter 

KTEKFL, STATE 

WRITEMEKOF.Y 

SKIPRADIO 

OnePass, STATE 

L_A_C, #C~7H 

nz, DontWriteLimits 



■WriteNewLiir.its : 

cp STATE, #STOF 



Dr 
cp 

j i 

J 1 

BackOf i'j-z: 



nz, WriteUpLirr.it 
LIM_TEST_HI, #0 0 
nz, KriteUpLi^it 
LIK_TEST_LC, fli 
ugt, Krite'Jpliir.it 



aac _ 
■KriteUpLiir.it : 

Id SKIFRADI 



UP LIMIT HI, #GC 



; Else, it should be zero 
35) 



; Reset the pass point counter to zer 



; Set the pass point counter to 

Test to make sure up limit is at a 
; a learned and legal value 



Look for up limit set to illegal value 
; If so, set the limit fault 



; Skip radio EE PROM reads 
Read the down limit 



:ok:< 



Test to make sure down limit is a: 
a learned and legal value 



Look for down limit set to illegal value 
If not, proceed as normal 

Set the "no limits" fault 
; Stop the GDO 



Turn off the radio read 

Write the current state and pass c 



DON'T update the pass point here! 



; Clear the one-shot 

Test for successful learn cycle 
If not, skip writing limits 



Test for (force) stop within 0.5" 

the original up limit position 



Back off the up limit by 0.5" 
; Skip radio EE PROM reads 
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Id 


ADDRESS, #UPLIMADDR 


di 




Id 


MTEMPH, UP LIMIT_HI ; 


Id 


MTEMPL, UP_LIMIT_LO 


ei 




call 


WRITEMEMORY 


WriteDnLimit : 




Id 


ADDRESS, #DNLIMADDR 


di 




Id 


MTEMPH, DN_LIMIT_HI 


Id 


MTEMPL, DN_LIMIT_LC ; 


ei 




call 


WRITEMEMORY 


WritePassCount : 


Id 


ADDRESS, # LAST STATEADDR 


Id 


MTEMPH, PassCounter 


Id 


MTEMPL, STATE 


call 


WRITEMEMORY 


clr 


SKIPRADIO 


clr 


LAC 


or 


ledport, iledn ; 


DontWriteLim 


its : 


srp 


#LEARNEE_GRr 


™ clr 


STACKFLAG 


H.: id 


SKIPRADIO, #NOEECOMM 


'42- 1 d 


address, #CYCCOUNT 


yj call 


READMEMORY 


L.L inc 


mtempl '• 


Jc i T 


nz, COUNTERl DONE 




mt emph 


§== jr 


nz, COUNTEP.2DONE 


s call 


WRITEMEMORY 


Li ir.c 


address 


L, call 


READMEMORY 


S = ! inc 


mtempl 




nz, COUNTER2DONE 


ITJ inc 


mtemph 


CSf NTER2DONE 




xzz. call 


WRITEMEMORY 




address, #CYCCOUNT 


call 


READMEMORY 


and 


mtemph, #00C0illlE 


or 


mtemph, % 3 OH 


ld 


ADDRESS, MTEMPK 


Id 


mtempl , DNFORCE 


ld 


mtemph, UPFORCE 


call 


WRITEMEMORY 


jz 


CDONE 


COUNTERl DONE : 


call 


WRITEMEMORY 


CDONE : 




clr 


SKIPRADIO 


NOCHANGEST: 




call 


LEARN 


di 




cp 


BRPM COUNT , RPM_COUNT 


jr 


Z, TESTRPM 


RESET: 




j F 


START 


TESTRPK: 






BRPM TIME C'JT,R?X TIME O'JT 


jr 


r.z , RESET 


cp 


BFORCE IGNORE, FORCE_IGNORE 


-> r 

j 


nz, RESET 



Read the up limit 



3 



Read the up limit 



; Write the current state and pass count 
Update the pass point 



Leave the learn mode 
turn off the LED for program mode 



set the register pointer 
; clear the flag 
; set skip flag 

; set the non vol address to the cycle c 
; read the value 
increase the counter lower byte 

increase the counter high byte 

store the value 

; get the next bytes 

; read the data 
increase the counter low byte 

increase the vounter high byte 

save the value 

; read the data 

find the force address 



set the address 
read the forces 



write the value 

done set the back trace 

got the new address 

; clear skip flag 

; do the learn switch 
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0 



di 
cp 
jr 
cp 
jr 
cp 
jr 
ei 

TESTRS232 : 
SRP 

tcir. 
DP 

cp 

jP 
cp 

jp 

cp 

jr 

cal! 

jP 



BAUTO_DELAY , AUTO_DELAY 

nz, RESET 

BCMD_DEB, CMD_DEB 

nz, RESET 

BSTATE, STATE 

nz, RESET 



#TIMER_GROUP 
RS_COUNTER, #0000 j 
nz, SKIPRS2 32 



; If we are at the end of a word, 
then handle the RS232 word 



NotRs3C 



cp 



1= call 

if 1 DP 

Not^.S3E: 

=£= ic 
hi ld 

add 
4= adc 

add 
~ aac 

a da 
1.1 adc 
p call 
III jP 



rs command, # ' V 
ugt, ClearRS232 
rscommand, # ' 0 ' 
ult, ClearRS232 
rscommand, # ' < ' 
nz,NotRs3C 
GotRs3C 
SKIPRS232 

rscommand, # ' > ' 
nz,NotRs3E 
GctRs3E 
SKIPRS232 

rs temp h^,#KZGH (RS232 JumpTable- (3 
rs _ temp~lc, ft LOW (RS232 JumpTable- (3* 

rs_temp_lc, rs command 

rs temp_hi,ftOC 

rs temp_lc, rscommand 

r£_temp_hi, * C C 

rs_temp_lc, rscorar.ano 

rs_temp_hi , #00 

@rs_temp 

SKIPRS232 



test for in range 
if out of range skip 
If we are reading 
go straight there 



If we are writing EE PROM 
go straight there 



•»0')) address pointer to table 

0')) ; Offset for ASCII adjust 



look up the jump 3x 

look up the jump 3x 

look up the jump 3x 

call this address 
done 



RS232 JumpTacle : 



j p 


GotRsSC 


jp 


GotRs 31 


jp 


GctRs32 


jp 


Got?s33 


jp 


GotRs34 


jp 


GotRs35 


jp 


GotRs3 € 


jp 


GotRs3~ 


jp 


GotRs38 


jp 


GotRs3 9 


jp 


GotRs 3A 


jp 


GotRs3E 


jp 


GotRs3C 


jp 


GotRsSD 


jp 


GotRs 3E 


jp 


GotRs 3F 


jp 


GctRs40 


jp 


GotRs41 


jp 


GotRs42 


jp 


GotRs4 3 


jp 


GotRs4 4 






jp 


GotRs4 6 


jp 


GotRs47 




Gc~Rs4 E 


OF 


GctRs4 9 


jp 


GotRs 4 A 


3P 


C-ot?s4E 


DP 


GctRs4C 
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jp GotRs4D 

jp GotRs4E 

jp GotRs4F 

jp GotRs50 

jp GotRs51 

jp GotRs52 

jp GotRs53 

jp GotRs54 

jp GotRs55 

jp GotRs56 

ClearRS232 : 

and RS_COUNTER, illllOOOOb ; Clear the RS232 state 

5KIPRS232 : 

UpdateForceAndSpeed : 

; Update the UP force from the look-up table 

srp #FORCE GRO'JF ; Point to the proper registers 

Id force_adG_ni, #HIGH ( force_table) ; Fetch the proper unsealed 

„ Id f orce_add_l c, #LOK fcrce_table- ; value from the ROM table 

% di ' 

^ add force_add_lo, upforce ; Offset to point to the 

W adc force_add_hi, #0C ; proper place in the table 

Jj add f orce_add_lc, upfcrce ; x2 

!>S adc f orce_add_hi , #0C 

72 add force_add_io, upforce ; x3 (three bytes wide) 

r ~ adc force_add_hi, #00 ; 

y ~ e i ' 

„ icic force_temp_cf, C<fcrce_ad3 ; Fetch the ROM bytes 

=_,=.. incw force_add '< 

!Z ldc force_temp_hi, @fcrce_add 

incw force_add > 

fy ldc f orce_temp_lo, @force_add ; 

52 Id Divisor, PcwerLevel ; Divide by our current force level 

call ScaleTneSpeed ; Scale to get our proper force number 

dl ; Update the force registers 

la UF_FORCE_H:, force_terf_h: 

Id UP_FORCE_LO, f orce_teir.p_lc 
ei 

; Update the DOWK force from the lock-up table 

Id force_add_hi, #HIGH ! f orce_table ) ; Fetch the proper unsealed 

Id force_add_lo, #LOW ( f crce_tacle: ; value from the ROM table 
di 

add force_add_lc, dr.force ; Offset to point to the 

adc force_add_hi, #00 ; proper place in the table 

add f orce_add_lo, dr.force ; x 2 

adc f orce_add_hi , #0C '• 

add force_add_lc, dr.force ; x3 (three bytes wide) 

adc force_add_hi, #00 i 

ei ' 

ldc force_temp_of , @force_add ; Fetch the ROM bytes 

incw force_add • 

lac f or ce_terp_hi , C'fcrce_ada ; 

incw force_add 

ldc f crce_terrx_lc, (?fcrce_adc ; 

Id Divisor, PowerLevel ; Divide by our current force level 

call ScaleTheSpeec ; Scale to get our proper force numbe: 
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di ; Update the force registers 

Id DN_FORCE_HI, f orce_temp_hi 

Id DN_FORCE_LO, f orce_temp_lo ; 

ei ; 



; Scale the minimum speed based on 


force setting 


cp 


STATE, #DN_DIRECTION 




; If we're traveling down, 


jr 


z, SetDownMinSpeed 




; then use the down force pot for min. speed 


SetUpKinSpeed 








di 






; Disable interrupts during update 


Id 


MinSpeed, UPFORCE 




; Scale up force pot 




MinSpeedMath 






SetDownMinSpeed : 






Id 


MinSpeed, DN FORCE 




; Scale down force pot 


MinSpeedMath: 








sub 


MinSpeed, #24 




pot level - 24 


jr 


nc, UpStep2 




; truncate off the negative number 


clr 


MinSpeed 






UpStep2 : 








rcf 






; Divide by four 


rrc 


KmSpeed 






rcf 








Q rrc 


MinSpeed 






if* ado 


MinSpeed, #4 




; Ada four to find the minimum speed 




MinSpeed, #12 




; Perform bounds check on minimum speed. 


jr 


ule, KmSpeedOkay 




; Truncate if necessary 


U Id 


MinSpeed, #12 






MinSpeedOKay : 








Li ei 






; Re-enable interrupts 


; Make 


sure the wcrklight is at the pr 


oper time on power-up 


= cp 


LmeFer, #3 6 




; Test for a 50 Kz system 




ult, TestRacicDeadTire 




; if not, we don't have a probler. 


H c p 


LIGHT_TIMER_HI , # 0 FFH 




; If the light timer is running 


~ j r 


z, TestRadioDeadTime 




; and it is greater than 


§y cp 


LIGHT_TIMER_KZ , #EURO_LIGH7 


_HI 


; the European time, fix it 


U jr 


ule, TestRadioDeadTime 




, 


O call 


SetVarLight 






TesTfRacicDeadTine : 






cp 


R DEAZ 7 ZKZ , * 2 5 




; test for too long deac 


DP 


nz,MAINLOO? 


if 


not loop 


clr 


RadioC 




; clear the radio counter 


clr 


RFlag 




; clear the radio flag 


DP 


KAIKLCCP 




; loop forever 


; Speed 


scaling (i.e. Division; rout 


me 




ScaleTheSpeed: 






clr 


TestReg 






Id 


loopreg, #24 




; Loop for all 24 bits 


DivideLoop: 








rcf 






; Rotate the next bit into 


rlc 


fcrce_temp lo 




; the test field 


rlc 


force_temp hi 






rlc 


force temp cf 








lestRe g 






cp 


TestReg, Divisor 




; Test to see if we car: subtract 




^. ~ *■ -c ~c~--e 




; If we can't, we're all ac.-.e 




TestReg, Ziviscr 




; Subtract the divisor 


or 


force_temp_io, #00000001b 




; Set the LSB to mark the subtract 


EitlsDcr.e : 








djr.z 


loopreg, DivideLoop 




; Loop for all bits 
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J 



DivideDone : 

; Make sure the result is under our 500 ms limit 

force_temp_of , #00 ; Overflow byte must be zero 

nz, ScaleDown ; 

force_temp_hi, #0F4H ; 

ugt, ScaleDown ; 

ult, DividelsGood ; If we're less, then we're okay 

f orce_temp_lo, #024H ; Test low byte 

; if low byte is okay, 



j* 
cp 

jr 
jr 
cp 
jr 

DividelsGood 
ret 



ugt, ScaleDown 



; Number is good 



ScaleDown : 
Id 
Id 
ret 



f orce_temp_hi, #0F4K 
force temp_lo, #024K 



; Overflow is never used anyway 



****** ********************* 

RS2 32 SUBROUTINES 

It************************* * 

"0" 

Set Command Switch 
G€BRs3C : 
Ji Id LAS7_CKD, fcOAAH 

: =t; call CmdSet 
y=J jp NoPos 



^******************************* 



r***************************************l 



; set the last command as rs wall cmd 
; set the command switch 



; ai" 

; =Glear Command Switch 

G$fns31 : 
^* call CmdRel 
a 3P NoFcs 



; release the command switch 



; "2" 

;5Set Worklight Switch 

GeMRs32 : 
O call LightSet 
f% jp NoPos 



; set the light switch 



; Clear Worklight Switch 

GotRs33: 

clr LIGHT_DEE 
jp NoPos 



; Release the light switch 



; Set Vacation Switch 

GotRs34 : 

call VacSet 
jp MoPos 



; Set the vacation switch 



; Cl««r Vacation Switch 

GotRs35: 

clr VAC_DEB 
jp NoPos 



; release the vacation switch 



; Set smart switch 
GotRs3€: 

call SmartSet 
jp NoPos 



; Clear Smart 
GotRs3" : 



.•itch set 
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call 
jP 



SmartRelease 
NoPos 



J 



; Return Present state and reason for that 

GotRs38 : 

Id RS2 32 DAT, STATE 

or RS 2 3 2 DAT , S T ACKREAS ON 

jp LastPos 

; "9" 

; Return Force Adder and Fault 
GctRs39: 

Id RS2 32DAT, FA'JLTCODE 

jp LastPos 



state 



insert the fault code 



; Status Bits 
GotRs3A: 

clr 

tm 

cr 



RS232DAT 
P2, #01000000b 
z, LookForBlink 
RS 2 32 DAT , #00000C01b 



Reset data 

Check the strap 

If none, next check 

Set flag for strap high 



Lod^FcrBlmk : 



cai- 
tit 



ReajdLight : 
tir. 

or 

C34Done : 

O or 
LockFcrFass : 
tir. 
tcrr. 
or 

LookForProt : 



or 



LookFor Flasher 
P2, #BLINK_FIN 
nz, ReadLight 
RS2 32DAT , # 00 00 00 10b 



PC, *000CCC1G5 
z, CSADcne 

RS232DAT,#00000100b 



CodeFlag, #REGLEARN 
ult, LcokFcrPass 
RS2 32 DAT ,#000100 0 0b 



PassCounter, #Cliillllr: 
z, LookFcrPrct 
PassCounter , #GIlllillb 
z, LcckFcrPrct 
RS232DAT, fOOlOOGOOb 



ACsSr , #I000C0GGb 
nz, LookForVac 
RS232DAT, #01000000b 



; If flasher is present, 
then indicate it 

read the iioht 



; Test for being in a learn mode 
; If so, set the bit 



Check for above pass point 
If sc, set the bit 



; Check for protector break/blocx 
; If blocked, don't set the flag 
; Set flag for protector signal good 



LookForVac : 

cp 

jP 
or 



VAC FLAG, #00B 
nz, LastPos 
RS232DAT, #0000100 0b 
LastPos 



; test for the vacation mode 



ii . it 

; Returr. 1_ 
GetRs 35 : 
Id 



RS232DAT,L_A_C 
LastPcs 



; read the LAC 
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• Read a word of data from an EEPROM address input by the user 

GotRs3C: 

cp RS_COUNTER, #01 OH 

ji ult, FirstByte 

cp RS_COUNTER, #080H 

ji ugt, OutputSecond 



If we have only received the 
first word, wait for more 
If we are outputting, 
output the second byte 



SecondByte : 

Id 
Id 

call 

Id 

Id 

clr 

DP 



SKIPRADIC, # 0 FFK 

ADDRESS, RS2 32DAT 

READMEMORY 

RS2 32DAT, MTEMPK 

RS_TEMP_LO, MTEMPL 

SKIPRADIO 

MidPos 



Read the memory at the specified 
address 

Store into temporary registers 



OutputSecond : 

Id 

jP 



RS232DA7, RS_TEMP_L0 
LastPcs 



; Output the second byte of the re 



FCjstByte : 

i=~ inc 
U J ret 



RS COUNTER 



; Set to receive second word 



mode 



• 5 = " 

;|=Exit learn limn 
GptRs3D : 

/7 cp L _ A _ C ' * oc ' 

iH 3 jp z, NoPos 

a clr L_>--_C 

Lk cr lecport , * lesr. 

!•==, jp NoPos 



;C|Jrite a word of data to the address 
QotRs3E : 

W cp RS_COUNTER, #CiFr. 

jr z, Second5ytevr 

cp RS_C0UN7ER, 402FK 

jr z, ThirdByteV: 

cp RS_COUKTER, #0 3FH 

jr 2, FourthEyteW 



1TTD\ 



; If not in learn mode, 
; then don't touch the learn LED 
; Reset the learn limits state mac 
; turn off the LED for program mode 



the user 



FirstByteW: 
DataDone: 

inc 
ret 



RS COUNTER 



; Set to receive next byte 



SecondByteW: 
Id 

ThirdByteW: 

Id 

J* 



RS_TEMP_HI, RS232DAT 
DataDone 



RS TEK?_LC, RS232DA7 
Dat a t^cr.s 



; Store the address 



Store the high byte 



FcurthEvteW : 



cp RS_TEMF_HI, #03FH 

jr ugt, FailedWrite 



; Test for illegal address 
; If sc, don't write 
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Id 
Id 
Id 
Id 

call 
clr 
Id 
jP 

FailedWrite ; 

Id 
DP 



SKIPRADIO, #0FFH 
ADDRESS, RS_TEMF_HI 
MTEMPH, RS_TEMP_LO 
MTEMPL, RS232DAT 
WRITEMEMORY 
SKIPRADIO 
RS232DAT, #0OH 
LastPos 



RS232DAT, *0FFH 
LastPos 



) 



; Turn off radio reads 
Load the address 
and the data for the 
EEPROM write 



Re-enable radio reads 
Flag write okay 



; Flag bad write 



; Suspend all communication for 30 seconds 
SotRs3F: 

clr RSCOMMAND 



3P 



NoPos 



; Throw out any command currently 
; running 

; Ignore all RS232 data 



; Force Up State 
GcJEfs4 0: 

bB c p 
Si i z 
c p 

€i jp 

yj c ? 

L& jP 

= r Id 
y~ cal 
H= jp 



dontup : 



STATE , #DN_DIRECTION 
z, dontup 
STATE, #AUTC_REV 
z, NoPos 

STATE, #UP_PCSITION 
2, NOPOS 
RE AS OK, #00H 
SET_UF_DIR_STATE 
NoPos 



lc REASON, frCCH 

call SET_AREV_STATE 
jp NoPos 



If traveling down, make sure that 
the door autoreverses first 
If the door is autoreversing or 
at the up lirr.it, don't let the 
up direction state be set 

i 

Set the reason as command 



Set the reason as command 

; Autoreverse the door 



; f-Bcrce Down State 

GliRs41: 

cp STATE , # 51 

jp z,NcPcs 



clr 

cai: 

jF 



REASON 

SET_DN_ 

NoPos 



test for the down position 



Set the reason as commana 



; "B" 

; Force Stop State 
GotRs42 : 

clr REASON 

call SET_STOP_STATE 

jp NoPos 



; Set the reason as command 



; "C" 

; Force Up Limit State 
GotRs43: 

clr REASON 

call SET_UP_POS_STATE 

jp NoPos 



; Set the reason as command 



; Force Dowr. Limit State 
Gct?.s4 4 : 

clr REASON 

call SET_DN_POS_STATE 

3P NoPos 



Set the reason as comrr.anc 
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; Return min. force during travel 
GotRs4 5: 

Id RS232DAT,MIN_RPM_HI ; Return high and low 

cp RS_COUNTER,#090h ; bytes of min. force read 

jp ult,MidPos 

; Id RS232DAT,MIN_RPK_LO 

jp LastPos 1 



; Leave RS2 32 mode 
GotRs4 6 : 



go bac 



;;ar.r.ins for wall control switches 



clr 

Id 

clr 

Id 

ret 



RsMode 

STATUS, # CHARGE 
RS_COUNTER 
rsconmand, #0FFK 



Exit the rs232 mode 

; Scan for switches again 
; Wait for input again 
; turn off command 



"G" 

(No Function! 



G6.€Rs<5 7 



3P 



NoPos 



Mi 5 Second search for pass point the setup for the door 



G6iRs4 8 : 



4= id 


SKIPRADIO, #CFFK 


M= Id 


MTEMPH, # 0 FFH 


s Id 


MTEMF1, # C FFh 




ADDRESS, #UPLIMAOD? 


*Z call 


WRI TEMEMORY 


w Id 


ADDRESS, #DNLIMADDR 


flj call 


WRITEMEMORY 


ri Id 


UP LIKIT_KI, #HIGK (SetupPos 


■Z id 


UF LIMIT LC, *LOK SetupPcs: 


if Id 


positiok_k:, *C4:k 


and 


PassCounter , *10C00CCCc 


call 


SET_UP_DIR_STATE 


Id 


OnePass, STATE 


jP 


NoPos 


; "I" 

; Return rad 


ic drop-cut timer 


GotRs4S: 




clr 


RS232DAT 


cp 


RTO, #RDRDPTIKE 


jP 


uge, LastPos 


corr. 


RS232DAT 


jP 


LastPos 


; "J" 




; Return current position 


GotRs4A: 




Id 


RS232DAT,POSITION_HI 


cp 


RS_COUNTER, I0 50K 


jP 


ult,MidPos 


Id 


RS232DAT, POSITION_LC 


DP 


LastFcs 



; Disable radio EEPROM reads / writes 
Erase the up limit and down limit 
in EEPROM memory 



Set the door to travel 
to the setup position 
Set the current position to unknown 

; Reset to activate on first pass point seen 
; Force the door to travel 
; without a limit refresh 



; Initially say no radio on 
; If there's no radio on, 
then broadcast that 

; Set data to FF 



Test for no words out yet 
If not, transmit high byte 



. „ K ,. 

,- Set radio Received 
GotRs 4B : 

cp L _^_ C ' fr^CH ; If we were positioning the up limit, 
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jr 


ult, NormalRSRadio* ; 


then start the learn cycle 


jr 


z, FirstRSLearn 




cp 


L_A_C, #071H ; 


If we had an error, 


3P 


nz, NoPos 


; re-learn, otherwise ignore 


ReLearnRS : 






Id 


L_A_C, #072H ; 


Set the re-learn state 


call 


SET UP DIR STATE 




DP 


NoPos 


i 


FirstRSLearn : 






Id 


L_A_C, #07 3H ; 


Set the learn state 


call 


S£T_UP_POS_STATE 


; Start from the "up limit" 


jp 


NoPos 


; 


Norma IRSRadic 






clr 


LAST CMD 


; mark the last command as radio 


Id 


RADIO_CMD, #0AAH 


; set the radio command 


jp 


NoPos 


; return 


; "L" 

; Direct-connect sensitivity test - 


- toggle worklight for any code 


GotRs4C: 






; clr 


RTO 


; Reset the drop-out timer 


Id 


CodeFlag, #SENS_TEST 


; Set the flag to test sensitivity 


;==.. J P 


NoFos 










Go£8.s4D: 








NoPos 










; if we are w 


ithin the first <5 seconds ar.d RS232 mode is not yet enabled, 


; stiver, echo the nybble on F30 - F33 


on all other nybbles 


; .(A.K.A. The 


6800 test} 




GqtRs<£: 






. cp 


SDI SABLE, *32 


; If the 4 second init timer 


; : DP 


ult, ExitNoTest 


; is done, don't do the test 


"J- di 




; Shut down all other GDO operations 




COUNT KI, #0C2H 


; Set up to loop for 512 iterations, 


"". clr 


COUNT LO 


; totaling 13.05€ milliseconds 


Id 


poik, *occc:;occ 


; Set all possible pins of micrc. 


la 


F2M, *OOOOO0OCr 


; to outputs fcr testing 


Id 


F3K, #000000: lb 




WOT 




; Kick the dog 


Tilting Loop : 






clr 


REGTEMP 


; Create a byte of identical nybbles 


Id 


REGTEMP2, P3 


; from P30 - P33 to write to all ports 


and 


REGTEMF2 , #0C001111b 




or 


REGTEMP, REGTEMP2 




swap 


REG7EKF2 




or 


REGTEMP, REGTEMP2 




Id 


P0, REGTEMP 


; Echo the nybble to all ports 


Id 


F2, REGTEMP 




Id 


P3, REGTEMP 




decw 


COUNT 


; Loop for 512 iterations 


jr 


nz, TimingLoop 




jp 


START 


; When done, reset the system 



Return max. force durinc 



:ave. 



(oOtKSi r : 

Id RS2 32DAT, F32_MAX_HI 

cp RS_COUNTEP , # C S Oh 

jp uit,KidPos 



; Return high and low 

; bytes of max. force read 
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Id RS232DAT,P32_MAX_LO ; 

jp LastPos ; 



; Return the measured temperature range 
GotRs50 : 

jr NoPos ; 

; Return address of last merr.crv rr.stchir.g 
; radio code received 
GotRs51 : 

ld RS232DAT, RTEK? '' Send back the last matching addres 

jr LastPos '> 



Set Rs232 mode -- No ultra board presem 
Return Version 
GotRs52 : 

; Q clr UltraErd 
Set;IntoRs2 32 : 

iff Id RS232DAT,#VERSIONNUM 

"t! cp RsMode,#C0 

%U jr ugt, LockedlnNoCP 

hi Id RS232DA7, #0B3h 



; Clear flag for ultra board present 

; Initially return the version 

; If this is the first time we're 

; locking RS232, signal it 

; Return a flag for initial RS232 1c 



LockedlnNoCR : 
; =t= id RsKode,#32 
l~" jr LastPos 

; M n 

; Rs232 mode — Ultra board present 

; Set urn Version 
GoiMs53 : 

f=i ir NoPos 



; Range test -- toggle ucrkli; 
; is received 
GotRs54 : 



wr.er.ever e oooc memory-matching code 



clr RTO 

Id CodeFiag, *KA:;3E7EST 

jr NoPos 



; Reset the drop-out timer 

; Set the flag to test sensitivity 



; (No Function) 
GotRs55 : 



NoPos 



; Return current values of up and down force pots 
GotRs56 : 



Id 



Id 



RS232DAT,UPFORCE 

P 5 C 0VN7ER , * Z 5 Z r. 
uit,Xld?os 
RS232DAT, OKFORCE 
LastPos 



Return values of up and down 

force DCts . 



NidPos : 



cr R£_CO'JKTE?, # 1 OC QZ OZ 03 

inc RS COUNTER 



Set the output mcde 
Transmit the next byte 
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RSDone 



; exit 



LastPos : 
Id 
Id 
jr 

ExitNoTest : 
NoPos : 

clr 

Id 



RSDone : 



Id 

Id 

or 

and 

ret 



RS_COUNTER, #11I10000B 
rscommand, #0FFK 
RSDone 



RS_COUNTER 
rscommand, #0FFH 

RsMode, #32 
STATUS, #RSSTATUS 
P3, #CHARGE_SVi 
P3, #-DIS SW 



; set the start flag for last byte 
; Clear the command 



; Exit 



; Wait for input again 
; turn off command 



Set the wall control to RS232 
Turn on the pull-ups 



r*************1 



Radio interrupt from a edge of 



t **********************i 

the radio signal 



r ****** 1 



r*********1 



r ***** l 



************ 



RAf20_IKT : 

push RP 
srp 



#RadioGroup 



yj ld 

!==-. trc 
V j r 
7" tm 
P= j r 
s dec 
RTitKEOK : 

clr 



rtemph, TOEXT 

rtempl,T0 

IRQ, #00010000E 

z , RT1ME0K 

rtempl, #100000005 

Z , RTIMEOK 

rtemph 

R DEAD TIKE 



TwoThirtyThree 
IMR ,#111111105 



. IF 
and 
. ELSE 

and IMR, #1111110 0B 
. EKDIF 



RTimeDH, RTiTnerH 
RTimeDL, RTimePL 
RTimeDL, rterr.pl 
RTimeDH, rtemph 

P3, #000001005 
nz, ACTIVETIME 



Id 
Id 
sub 
sbc 

RTIKEDONE : 
tm 
jr 

INACTIVETIME: 

cp RINFILTER, # 0FFH 

jr z,GOINACTIVE 
jp RADIO_EXIT 

GOINACTIVE : 

.IF TwoThirtyThree 

or IRQ, #010000005 
. ENDIF 

clr RINFILTER 

Id rtimeih, RTimeDH 

la rtimeii , RTimeDL 

Id RTimePH, rtemph 

Id RTimePL, rterp 1 

r 

CP radioc,#ClH 

JF NZ, RADIO EXIT 



; save the radio pair 

; set the register pointer 

; read the upper byte 

; read the lower byte 
; test for pending int 
; if not then ok time 

; test for timer reload 

; if not reloaded then ok 

; if reloaded then dec high for sy; 

; clear the dead time 



; turn off the radio interrupt 
; Turn off the radio interrupt 

find the difference 

in past time and the past time ir 



terr.r 



; test the port for the edge 

; if it was the active time then branch 

; test for active last time 
; if so continue 

; if not the return 



; set the bit setting direction to pos edge 



set flag to inactive 

transfer difference to inactive 

transfer temp into the past 



/inactive time after sync bit 
:exit if it was not sync 
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I 



TM 

JR 

CP 

JP 

CLR 

3P 

FixedBlank: 
CP 
JP 

CLR 



ACTIVETIME : 
cp 

jr 

GOACTIVE: 

. IF 

and 
. EKE 



RadioMode, #ROLL MASK 



;If in fixed mode, 



J 



z, FixedBlank 

rtimeih,#OAH 

ULT,RADIO_EXIT 

radioc 

RADIO EXIT 



rtimeih, #014H 

ULT,RADIO_EXIT 

radioc 

RADIO_EXIT 

RINFILTER, #00K 
z, GOACTIVE 
RADIO EXIT 



TwoThirtyThree 
IRQ, #0C111111B 



;no number counter exists 

; 2. 56ms for rolling code mode 

;pulse ok exit as normal 
;if pulse is longer, bogus sync, restart sync search 
; return 



; test for the max width 5.16ms 
; pulse ok exit as normal 
;if pulse is longer, bogus sync, restart sync search 

; return 

; test for active last time 

; if so continue 

; if not the return 



; clear bit setting direction to neg edge 



:ft 1 G 

Sf Id 

y= ic 

ys ia 

GfeflBothEages 



.IF U. 
. Etc CI 



RINFILTE? , * OFFh 
rtimeah, RTimeDK 
rtimeal , RTimeDL 
RT ime FH , r t emph 
RTimeFl, rter.pl 

ex 

cp radioc , #1 
np ugt , INSIG 

seSiminor 

z, Cr.ec^Sirr.ir.cr 



BlankSkip: 
SyncOk : 



Fixedsync : 



mc 



TK 
JR 



cp 



cp 
i r 



TM 
JR 
CP 
JR 
JR 

cp 



radioc 

RFiag, #CClCCOCCE 
KZ , BlankSkip 

Radi cTineOjt , * 1 C 
u - 1 , Cie£r~ urx 

RFiag, *CC2 0 0 C C 0 = 

rtimean , # C Or. 
z , JustNcise 



transfer difference to active 
transfer temp into the past 



; enable the interrupts 

; test for the blank timing 

; if not then in the middle of signal 

; Test for a Simmer tx on the first fc: 

; set the counter to the next number 

;Has a valid blank time occured 



; test for the min 10 ms blank time 
; if not then clear the radio 

; blank time valid! no need to check 

; test first the min sync 

; if high byte 0 then clear the radio 



; checking sync pulse width, fix or Roll 



RadioMode, #RGLL_MASK 
z , Fixedsync 

rtimeah, #09h ;time for roll 1/2 fixed, 2.3ms 

uge, JustNcise 

SET1 



rtimeah, # 31 2r. 
uge, JustNcise 



; test for the max time 4 . 6mS 
; if not clear 



SET1 : 



SYNCIFLA3: 



clr PREVFIX ; Clear the previous "fixed" bit 

cp rtimeah, SyncThresh ; test for 1 or three time units 

ir uae, SYKC3FLA0 ; set the sync 3 flag 



RFiag, KlOOOOOCb 



;Was a sync 1 word the last received: 
if net, then this is an A 'or C cede 



SETBCCODE: 



radic3n, radiclh 



: Store the last sync 1 word 
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JustNoise : 



Id radio31, radioll 

or RFlag, #00000110b 

and RFlag, illllOlllb 

jr BCCODE 

CLR radioc 

JP RADIO EXIT 



J 



;Set the B/C Code flags 
; Clear the A/D Code Flag 



;Edge was noise keep waiting for sync bit 



SETADCODE : 





or 


RFlag, #00001000b 






BCCODE : 












or 


RFlag, #01000000b ; 


set the sync 1 memory 


flag 




clr 


radiolh 


clear the memory 






clr 


radioll < 








clr 


COUNT 1H 


clear the memory 






clr 


COUNT 1L 








3r 


DONESET1 


do the 2X 




SYNC3FLAG: 












and 


RFlag, *10111111b 


set the sync 3 memory 


flag 




clr 


radic3h 


clear the memory 






clr 










clr 


COUNT 3 K 


; clear the memory 






clr 


COUNT 3 L 








clr 


ID_E 


; Clear the ID bits 




DOSE SET! : 










RAi|0_EX:T: 












and 
pop 
iret 


SKIPRADIC, # LOKi-NOINTi 
rp 


; Re-enable radio ints 
; done return 





Clear Jurar : 



= 5=5 .IF 

SipRadic : 
SimBitOne ; 



or 
jP 



F2 , fclOOOCCOCc 
ClearRadio 



UseSiminor 



turn of the flag bat for clear radio 
; clear the radio signal 



tm 



sc: 
i r 



rtimeah, #10GCC000b ; Test for inactive greater than active 
nz, SiitBitZerc ; If so, binary zerc received 



Set the bit 



latelnBit 



SimBitZero : 



RotatelnBit : 



rcf 



rrc CodeTO 

rrc CodeTl 

rrc CodeT2 

rrc CodeT3 

rrc CodeT4 

rrc CodeT5 

inc raoioc 

cc racioc, * ; 4 5 - 128' 

3P uct , CLEARRADTC 

jp z, KnowSimCode 

ic RADIO EXIT 



Shift the new bit into the 
radio word 



increase the counter 

Test for all 48 tits receive: 
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CheckSiminor : 



i: 



tm 
jr 
cp 
jr 

or 
clr 



. ENDIF 



INSIG: 



ISigOk: 



ASigOk: 



AND 
cp 

cp 
jr 

cp 
jr 
cp 

sub 
sbc 



RadioMode, #ROLL_MASK 
2, INSIG 

RadioTimeOut, #35 
ugt, INSIG 

RadioC, #10000000b ; 
ID B 



RFiag, SllOllillB 
rtimeih, #C14K 
uge, Clear Jump 
rtimeih, #00h 
z, Clear Juir.p 

rtimeah, #014K 
uge, Clear Jump 
rtimeah, #0Ch 
2 , Clear Jump 

rtimeal , rtimeil 
rtimeah, rtimeir. 



; If not in a rolling mode, 
; then it can't be a Siminor transmitter 
If the blank time is longer than 35 ms, 
; then it can't be a Siminor unit 

Set the flag for a Siminor signal 
; No ID bits for Siminor 



; clear blank time good flag 
test for the max width 5.16 
if too wide clear 
test for the min width 

; if high byte is zero, pulse too narrow 

test for the max width 
if too wide clear 
if greater then 0 then signal ok 
; if too narrow clear 

; find the difference 



UseSiir.mor 



tm 



RadioC, #10000000b 
nz, SinRadio 



If this is a Siminor code, 
ther. handle it appropriately 



.ENDIF 



P0EBIFF2 : 



NEgflr F2 : 

BITIS3 : 

BIT2C0MP: 
BITIS2 : 

BITIS: : 

GOTRADBIT 



ADDRADBIT: 



tm 



cp 



com 
cp 

jr 
Id 



Id 
jr 

com 
Id 

clr 
clr 
clr 
clr 
ei 



rtimeah, #100000CQb 
nz , NEGDIFF2 
POSriFF2 

rtimeah, BitThresh 

ult,BITIS2 

BITIS3 



rtimear. 

rt imear., EitTnresh 
ult, BIT2COMF 

e:t:s: 

RADIOEIT , #2r. 
GOTRADBIT 



RADIOBIT, *lh 
GOTRADBIT 

rtimeah 
RADIOEIT, #0h 

rtimeah 
rtimeal 
rtimeih 
rtimeil 



SetRpToRaoi o2 Gr c _p 
srp #Radic2Grcap 
tr rflac, *::?CC^ 



find out if neg 

; use 1 for ABC or D 



test for 3/2 

; mark as a 2 



; invert 
test for 2/1 
mark as a 2 



set the value 

; invert 
set the value 



; invert 
set the value 

; clear the time 



; enable interrupts — REDUNDANT 

;Kacro for assembler error 
; — this is what it does 

; test for radio 1/3 



RC3INC: 



tm. 



RaaioKode, #R0L1 MASK 



;If in fixed mode, 
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3 



Radio3INC 



Radio3R: 
Radio3F: 



SPECIAL BITS: 



SWKECKID: 



tm 



call 



srp 

di 

Id 

Id 

jr 

cp 
jr 

Id 

add 

add 

add 

jr 

cp 
jr 
Id 



z, Radio3F 
RadioC, #00000001b 
nz,COUNT3INC 



GETTRUEFIX 
RadioC, #14 
uge, SPECIAL_BITS 



IRadioGrcup 

pointerh, #Radio3K 
pointer 1 , #Radio3L 
AddAll 

RadioC, #20 
z, SWITCHID 

RTempH, id_b 
ia_c,RTexpH 
id_b, RTeirspK 
ia_t,rea:ot:: 
Radi o3R 

id_b, #18 
uge, Radio3P. 
sw_b, radiobit 
Radic3R 



; no number counter exists 
; test for even odd number 
if EVEN number counter 

; else radio 

;Get the true fixed bit 

; test the radio counter for the specials 
; save the special bits seperate 



Disable interrupts to avoid pointer collision 
get the pointer 



; test for the switch id 
; if so then branch 

; save the special bit 



; add in the new value 



; If this was a touch code, 
then we already have the ID bit 
save the switch ID 



RC1=INC : 



Radiol INC 



SwitchBitl : 
RadiolF : 



tm 

]r 
tir. 
jr 

call 
cp 
jr 
tm 

J "*- 

jr 
Id 

srp 

di 

Id 

Id 

3* 



RadioMode, #R0LL_MASK 
z, RadiciF 
RadioC, fcOCGGOCC lb 
nz.COUNTUNC 



GETTRUEFIX 
RadioC, #02 
nz, RadiolF 
rflag, #GGOIOC0Cb 
z, SwitchEitl 
id_b, #ie 
ult, RadiolF 

sw_b, radiobit 

#RadioGroup 

pointerh, #RadiolH 
point er 1, #RadiclL 
AddAll 



;If in fixed mode, no number counter 

; test for even odd number 
if odd number counter 



; else radio 

;Get the real fixed code 
;If this is bit 1 of the 1ms code, 
;then see if we need the switch ID b: 
;If this is the first word received, 

;ther. save the switch bit regardless 
;If we have a touch code, 

;then this is our switch ID bit 

;Save touch code ID bit 



Disable interrupts to avoid pointer collision 
get the pointer 



GETTRUEFIX: 



COUNT 3 INC 



COUNT 1 INC 



; Chamberlain proprietary fixed code 



; bit 


decryption algorithm goes 


here 


ret 






Id 


rciibit, radiobit 


; Store the rolling bit 


srp 


#RadioGroup 




ri- 




; Disable interrupts tc 


le 


pointerh, # COUNT 3H 


; get the pointer 


Id 


pointer!, # COUNT 3 L 






AddAll 





;id cemter ccl-isicr. 
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Id 


rollbit, radiobit 


; Store the rolling bit 




srp 


#RadioGroup 






di 




; Disable interrupts to avoid pointer coll 




Id 


pointerh, #C0UNT1H 


; get the pointers 




Id 


pointerl, #C0UNT1L 




r 


jr 


AddAll 




AddAll: 










Id 


addvalueh, @pointerh 


; get the value 




Id 


addvaluel, gpcinterl 


'" 




add 


addvaluel, gpcir.terl 


; add x2 




adc 


addvalueh, @pointerh 


; 




add 


addvaluel , Gpointerl 


; add x3 




adc 


addvalueh, @pcinterh 


'" 




add 


addvaluel , RADIOBIT 


; add in new number 




adc 


addvalueh, #00h 






Id 


Spointerh, addvalueh 


; save the value 




Id 


Gpcinterl, addvaluel 






ei 




; Re-enable interrupts 


ALLADDED: 










inc 


radioc 


; increase the counter 


FUi&WOPX ? : 










cr 


racicc, MsxEitE 


; test for full (1C/2C bit) word 




jp 


nz , RRETURN 


; if not then return 


bin 


, , 1 t 1 W 


isable interrupts un 


til word is handled 




or 


SKIFRACIO, #NOIKT • 


; Set the flag to disable radio interrupts 




. IF 


TwcThirtyThree 




"~, 


and 


I MR, #11111110B 


; turn off the radio interrupt 


.'== 


. ELSE 






H : 


and 


I MR, #1I11110QE 


; Turn off the radio interrupt 




.ENDIF 






L _ ; 


clr 


RadioTimeCut 


; Reset the blank time 


'.-.:■} 


cp 


RADIOBIT, #00K 


; If the last bit is zero. 




DP 


z, ISCCODE 


then the code is the obsolete C code 




and 


RFlag, #11111101E 


; Last digit isn't zero, clear B code flag 


I$CCODE: 










tir. 


RFlag, fcoOCi-CCOCr: 


; test flag for previous word received 




jr 


nz,KNOWCCDE 


; if the second word received 


FIRST2C : 










or 


RFlag, tOCClCCCCB 


; set the flag 




clr 


raoicc 


; clear the radio counter 




DP 


RRET'JRN 


; return 



. IF UseSimincr 



Knows imCode : 

; Siminor proprietary rolling code decryption algorithm goes here 



Id radiolh, #0FFH 

clr MirrorA 

clr MirrorB 

jp CounterCorrected 



Set the code to be incompatible with 
the Chamberlain rolling code 



, ENEIF 



KNOKCOEE : 



tr RadioKcce, fc? C_L_X.-.3K ;If not in rolling mode, 

;r z, Coar.ter Corrected ; forget the number counter 

; Chamberlain proprietary counter decryption algorithm goes here 
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CounterCor rected : 



NoTCode : 



STORECODE: 



srp 


♦RadioGroup 


clr 


RRTO 


tm 


SKIPRADIO, #NOEECOMM ; 


jP 


nz , CLEARRADIC ; 


f~r> 
up 


ID B, #18 


i r 


ult, NoTCode 


or 


RFlag, #0000C100b 


Id 


ADDRESS, #VACATIOKADDR 


call 


READMEMORY 


Id 


VAC FLAG, MTEKPH 


cp 


CodeFlag, #REGLEARK 


jP 


nz , TESTCODE 


tm 


RadioMode, #ROLL_MASK 




z, FixedOnly ; 



; clear the got a radio flag 
for the skip flag 
kip flag is active then donot look at EE mem 

;If the ID bits total more than 18, 

;then indicate a touch code 

; set the non vol address to the VAC flag 
; read the value 
; save into volital 
for in learn mode 

; if out of learn mode then test for matching 
;If we are in fixed mode. 



ComoareCcunter; 



cp 

jP 
cp 

DP 
cp 
DP 
cp 

3P 



PCour.terA, MirrcrA 
n 2 , S TORENCTKAT CK 
PCounterE, MirrorB 
n z , STOREN OTMAT CK 
PCounterC, KirrcrC' 
nz, STORENOTMATCH 
PCcunterD, MirrorD 
nz, STORENOTMATCH 



Test for counter match tc previous 

; if no match, try again 
Test for counter match to previous 

; if no match, try again 
Test for counter match to previous 

; if no match, try again 
Test for counter match to previous 

; if no match, try again 



FixedOnly : 



cp PRADIOl K , raci oi r. 

j p nz , STORES OTMAT CH 

cp PRADI01L, radioll 

jp nz, STORENOTMATCH 

cp PRADI03K, radic3'r. 

j p nz , ST OREN OTMAT C K 

cp PRAZIC3L, racic21 

jp nz, STORENOTMATCH 

cp AUXLEARNSK, 4= 11 € 

ir ugt, cmdonly 



test for the match 

if not a match then loop again 

test for the match 

if not a match then loop again 

test for the match 

if not a match then loop again 

test for the match 

if not a match then loop again 



; If learn was not from wall contro] 
:her. learr. a commar.a cr.iy 



CmdNotOper. : 



CheckLight : 



tm 
J - 



tm 

3P 

tm 

:p 



LearningLight : 



tm 
jr 
Id 
Id 



CMC_DEE, #10CC: 
nz, CmdOrOCS 



}b ; If the command switch is held, 

; then we are learning command or o/c/s 



LIGKT_DE5, fciOCCOOGOr. 
z, CLEARRADI02 
VAC_DEE, #1000CC'0Cb ; 
z, CLEARRADI 02 

RadioMode, #ROLL_MASK 
z, CMDONLY 

CodeFlag, #LRN LIGHT ; 
BitMask, #01010101b ; 
CMCON1Y 



; If the light switch and the lock 
; switch are being held, 
then learr. a light trans. 



; Only learn a light trans, if we are in 
the rolling mode. 



CmdOrOCS: 



tm. 
jr 



lig:-:t_de=, 

nz, CMDONLY 



If the light switch isn't being he: 
then see if we are learning o/c/s 



CheckOCS: 
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tm 

jP 
tm 
jr 
tm 

jr 
Id 
Id 



VAC DEB, #10000000b ; If the vacation switch isn't held. 



z, CLEARRADI02 
RadioMode, #ROLL_MASK 
Z, CMDONLY 

RadioC, #10000000b ; 
nz , CMDONLY 
CodeFlag, #LRNOCS 
BitMask, #10101010b ; 



then it must be a normal command 
Only learn an o/c/s if we are in 
the rolling mode. 
If the bit for siminor is set, 

; then don't learn as an o/c/s Tx 
; Set flag to learn o/c/s 



CMDONLY: 



ViriteOverOCS : 



call 

cp 

Dr 

dec 
DP 



TESTCODES 
ADDRESS, *CFFr 
z , STORE MATCH 

ADDRESS 
READYTOWRITE 



test the code to see if in memory now 
If the code isn't in memory 



STOREKATCH : 



Set^sFixed : 



SetAsRoll : 



WriteMode : 



cp 
jr 

la 

cal 1 
tr 



Id 

call 
jr 

Id 

call 



RadioMode, #ROLL_TEST ; If we are not testing a new mode, 

ugt, SameRadioMode ; then don't switch 

ADDRESS , #MODEADDr ; Fetch the old radio mode, 



READMEMORY 
RaaicMode, #?3LL_MASK 
nz, SetAsRcll ; 

RadioMode, #FIXED_MODE 

FixedNums 

WriteMode 

RadioMode, #RCLL_MODE 
RollNuir.s 

MTEMFL, RadicMoae 
WRITEMEMDRY 



; change only the low order 
; byte, and write ir. its new value 



Set the fixed thresholds permanently 



; Set the rolling thresholds permanently 



Sat>yRadioMode : 



ACODE : 



tm 

jF 
tm 

Id 

call 
mc 
mc 
tr. 



RFlag, #000CCC103 
nz, CCODE 
RFlag, *tDCQOC-lCCE 
nz, BCODE 

ADDRESS, *2BH ; 

READMEMORY 

MTEMPH 

MTEMPH ; 
RadioMode, *ROLL_MASK 
z, FixedMem 



If the flag for the C code is set, 

then set the C Code address 
test for the b code 
if a B code jump 



set the address to read the last written 

; read the memory 
add 2 to the last written 

; If the radio is in fixed mode, 

; then handle the fixed mode memory 



RollMerr.: 



inc 
inc 
and 
cp 



MTEMPH 
MTEMPK 

MTEMPH, #11111100B 
MTEMPH, #1FH 
ult, GOTAADDRESS 
AddressZero 



; Add another 2 to the last written 



Set to a multiple of four 
test for the last address 
If not the last address jump 
Address is now zero 



FixedMem : 



and MTEMPH, #111111103 
Cp MTEMPH, #17H 

n r ult , GOTAADDRES S 



; set the address on a even number 
; test for the last address 

; if not the last address jump 



AddressZerc : 



GOTAADDRESS : 



la MTEMPH, Kl 

ld ADDRESS, #2BH 

Id RTemp, MTEMPH 

LD MTEMFL, MTEMPH 



; set the address to 0 

; set the address to write the last writter 
; save the address 
; both bytes same 
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0 





call 


WRITEMEMORY 




Id 


ADDRESS, rtemp 




jr 




CCODE : 








tIU 


RaHinMnrip #ROLL MASK 




DP 






Id 


AL>DKfc*oo, ft Ulnil 




jr 




BCODE : 








tm 






jr 


z, BFixed 


BRoll : 








cp 


SW B, # ENTER ; 




jP 


nz, CLEARRADIO 




Id 


» ^ nn rPC ft O 1^ » 

ADDRES5, tiun , 




jr 


t\t*'H nVT f\.TiTD TTT 

READY 1 (JWK1 1 H 


BFixed : 








cp 


raaiojfif t yon * 




jr 


HZ , BCUDfc.UK 




cp 


n * ^ Q 1 J40QTJ * 

radio ji , w sw , 




jr 


nz , BCOLEOK 




DP 


CLEARRADIO 


BCOfEOK : 








Id 


address, fie:-: ; 


WSJSpYTOWRITE 


* 




■J"i 


call 


WRITECODE 


NOFIX STORE : 








tm 


RadioMode, #ROLL_MASK 




jr 


z, NOWRITE STORE 


- 


inc 


ADDRESS 




Id 


RadiolH, MirrorA 




Id 


RadioIL, MirrorE 


S 


Id 


Radic3H, KirrorC 




Id 


Radio3L, KirrcrT 


Q 


call 


WRITECODE 




call 


SetMas k 




com 


BitMask 




Id 


tv nnr Tree 4iT5"^""VT!; T" T '~*i r ~'C - 

ADDRcSs, fK. irin^-." , 




can 


READMENORY 




tir, 


R r 1 a g , £ _ J ^ w - 1 ^ J ^ *~ 




j r 


nz, UpByte 


LowByte : 








and 


MTEMFL, BitMasK 




jr 


MaskDone 


UpByte : 




MTEMFK, BitKask 




and 


MaskDone : 








com 


BitMask 




cp 


CodeFlag, *LRK LIGHT 




jr 


z, LearnLight 




cp 


mUci IdU r f jnh J C 




Dr 


z, LearnOCS 


Normal : 








clr 


C -J ^ M — Lr 

ei tna s k 




jr 


BMReady 


LearnLight : 








and 


BitMask, #v. ^-C.e 




jr 


BMReaoy 


LearnOCS : 








cp 


SW E, £C2H 




jP 


nz, CLEAR RAD1 02 




and 


BitMask, fclClClOlOb 



; write it 
set the address 



; If in rolling code mode, 

; then HOW DID WE GET A C CODE? 

; Set the C code address 



; If in fixed mode, 

; handle normal touch code 

If the user is trying to learn a key 
; other than enter, THROW IT OUT 
Set the address for the rolling touch code 



test for the 00 code 

§ 

test for the 00 code 

; SKIP MAGIC NUMBER 
set the address for the B code 

; write the code in radiol and radio3 



If we are in fixed mode, 

then we are done 

Point to the counter address 

Store the counter into the radio 

for the writecode routine 



Ferch the radio types 

f 

; Find the proper byte of the type 
; Wipe out the proper bits 



If we are learning a light 

set the appropriate bits 

; If we are learning an o/c/s, 
,- set the appropriate bits 



; Set the proper bits as command 



Set the proper bits as worklight 
; Bit mask is ready 

; If 'open' switch is not being hela, 
; then don't accept the transmitter 
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BMReady : 

LowByt2 : 

UpByt2 : 
MaskDon2 : 



tm RFlag, #10000000b 

jr nz, UpByt2 

or MTEMPL, BitNask 

jr MaskDon2 

or MTEMPK, BitMask 

call WRITEMEMOFY 



; Find the proper byte of the type 

t 

; Write the transmitter type in 

; Write the transmitter type in 

; Store the transmitter types 



N0WRI7EST0RE : 



STORENCTK; 



TESTCODE : 



xor 

or 

Id 

Id 

clr 

ci r 

DP 

Id 

id 
id 
Id 
tm 

jP 
Id 

i 

ia 
Id 
3P 

CD 



trr. 



cp 



cp 
i r 
cc 



pC , #WORKLIGHT 
ledport, #iedh 
LISHT1S, #244 
LEARNT, # DFFH 
RTO 

CodeFlag 
CLEAR RADIO 

PRADIOIR, radiolh 
FRADIOIL, racic^^ 
FRADI35H, redioSr. 
FRADIC2L, raci;21 
RacioKode, #R3LL_K? 
z, CLEAR RADIO 
PCcanterA, KirrorA. 
PCcur.terB, KirrcrE 
PCc.ir.rerC, KirrorC 
PCounterD, KirrcrD 
C LEAR RAD I C 

ID_E, #18 

uge, TDReceivec 

RFlag, #C00CC1CC'C 
z, AorDCoae 

ZZKIK, #€4 
ugt, AcrDDcae 

Raaicih, #SCh 
r.z, AcrDDcoe 
Re oi c 11, #2yh 
nz, AcrDCcoe 



toggle light 

turn off the LED for program mode 
turn or. the 1 second blink 
set learnmode timer 

; disallow cmd from learn 
; Clear any learning flags 
; return 

transfer radio into past 



If we are in fixed mode, 
get the next code 
transfer counter intc past 



; If this was a touch code, 
; r.andle appropriately 

; If we have received a B code, 
; then check for the learn mode 

; Test 0000 learn window 
if cut cf window nc learr. 



ZZLearr. : 



AorDCode 



FS1 



FS2 : 



pus.- 

srp 

call 

pep 

DP 



cp 
cp 
and 



cp 



RP 

#LEARNEE_GRF 
SET LEARN" 
RF 

CLEARRADI C 



L_A_C, #C?0K 
uge, FS1 
FAULT FLAG, #0FFH 
z, FS1 

ledport, iledi 



L_A_C, *C7 0r 
u cr e F S 2 
F.-.l'LTFLAG, f- I 
z , FS2 

lecrcrt,*iec 



Test for in learn limits mode 

; If so, don't blink the LED 
; test for a active fault 

; if a avtive fault skip led set and reset 
turn on the LED for flashing from signal 

; test the codes 
Test for in learn limits mode 

If so, don't blink the LED 
test for a active fault 

if a avtive fault skip led set and reset 
off the LED for flashing fror signal 
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cp 
jP 



ADDRESS, #OFFh 
nz, GOTMATCH 
CLEARRADIO 



test for the not matching state 

; if matching the send a command if needed 
; clear the radio 



SimRollCheck: 



inc ADDRESS 

inc ADDRESS 

call READKEMORY 

Id CounterC, KTEMPH 

Id Count erD, KTEMFL 

cp CodeT2, CounterC 

3r nz, UpdateSCode 

cp CodeT5, CounterD 

jr nz, UpdateSCode 

3P CLEARRADIO 



Point to the rolling code 
(Note: High word always zero) 
Point to rest of the counter 
Fetch lower word of counter 



; If the two counters 
; then don't activate 



; Counters equal 



throw it out 



UpdateSCode : 



ill 
m 
w 
u 

J: 

Gdk>-MATCK: 

M 

o 
ru 
o 

Q 

o 



Id 
Id 
call 

sub 
sbc 

trr. 
DP 

:f 



tr 



tr 
tr 



KTEKFH, CodeT2 ; Always update the counter if the 

MTEKFL, CcaeTI- ; fixed portions match 

KFITEKZKCFY 

CodeT3, CounterD ; Compare the two codes 

CoaeTI, Counter Z ; 

Coae!2, #lCC:c:0Cc ; If the result is negative, 
nz, CLEARRADIC ; then don't activate 

MatchGoodSm ; Match good -- handle normally 

EaoicXme , t?:i: YJ-.SY ; If we are m fixed mode, 

2, Katcr.GcmZ _ ; men me mater, is already vaiia 

RadioC, #:0000C0Crr ; If tms was a Simmer transmitter, 

nz, SimRollCheck ; then test the roll in its own way 

BitKas'., *i:i:i:iCc ; If this was NOT an open/close/stop trans, 

z, FcllCr.eckE ; then we must check the rolling value 

SK E, #Ci : If the o/c/s had a key other than '2 

nz7 Katcr.GccaDCS ; then don't check / update the roll 



RollCheckE : 



KatchGood : 



call TestCcmter 

cp CMP, *EQ"J.-.l 

jp z, NOTNEWMAT CH 

cp CM?, I v; I 

jp nz, CheckPast 

Id RadiolH, MirrorA 

Id RadiolL, KirrcrE 

id Radic3.-;, KirrorC 

Id Radio3L, KirrorD 

dec ADDRESS 

call WRITECODE 



; Roiling mode — compare the counter values 

; If the code is equal, 

; then just keep it 
; If we are net m forward window, 
; then forget the code 

; Store the counter into memory 
; to keep the roll current 



; Line up the address for writing 



MatchGoodOCS: 
MatchGocdSim: 



CF 

i r 



RFlag,*:ceOOCCiE 
FTC, i?T?T?TIKI 

ADDRESS, #2 3H 
z, MatmGcoal 



; set the flag for recieving without error 

; test for the timer time cut 

; if me timer is active tr.er. aenct reiss_e 

; If the code was the rolling touch code, 
; then we already know the transmitter type 
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1 



J 



LowerD : 

Upper D : 
TransType : 



M*tchGood2 : 



TESTVAC: 



call 
Id 

call 
tm 

jr 

and 
jr 

and 

trr. 
Dr 
tm 



or 
cp 
DP 



DP 

trr, 
3 r 

ct 
DF 



SetMask 

ADDRESS, #RTYPEADDR ; 

READMEMORY 

RFlag, #10000000b 

nz, UpperD 

BitMask, MTEKPL 
TransType 

BitMask, MTEMPH 

BitK=sk, *::c:c:C'ib ,• 

nz, LightTrar.s 
BitMask, *!ClClC10b ; 
nz, OCSTrar.s 



RFlag, #00CCCCC:b 
RTO, #RDROPTIME 
uit , NOTNEWMATCK 

vacflac-, * : :? ; 

z,TSTSr: SABLE ; 

Racio.v.cae, #?CLL_KAS? 
z, Fixed- 

ACCFESS, *2Z-h ' ; 

nz, N3TKEW.v-.TC:-. 
TSTSC I SABLE 



; Set the mask bits properly 
Fetch the transmitter config. bits 



If we are in the upper word, 
check the upper transmitters 

; Isolate our transmitter 
; Check out transmitter type 

; Isolate our transmitter 



Test for light transmitter 

; Execute light transmitter 
Test for Open/Close/Stop Transmitter 
Execute open/close/stop transmitter 

; Otherwise, standard command transmitter 



set the flag for recieving without error 
test for the timer time out 

if the timer is active then donot reissue cmd 



test for the vacation mode 

if net m vacation mode test the svster 



If tr.is was a touch code, 
; then do a command 



FikedE : 



TSffiSCI SABLE : 



RAT ICC OMMA! « 



2zwinclr : 



EDONTSET: 



ReLearning : 



First-ear: 



3F 



cp 

jF 
cl : 
cp 
DF 

cl: 
trr 



c_ r 
Id 



cp 
3r 

cp 

jp 

Id 

cal 

jP 

Id 
cal 



ACLRESS, *1S\- 
nz.NCTNEWM-.: 



SDISAELE, #2: 
ult,NOTKEW*-i: 

rt: 

one? i , * : : 

nz , NDTNEV.'v-.: 



RTC 

RFlag, #CC: 
z,ECCNTSE' 



:e:: fcr tr.e & code 

; if not a B not a match 



; test for 4 second 

if € s net up not a nev. code 
clear the radio timeout 
test fcr the 1.2 second time out 
if the timer is active then skip the comm 



clear the radio timeout 

test for a E code 

if net a b cede donot set fl 



CodeFlao , #ERECEIVE! 



L_A_C, #C0K 
ult, Norrr.alRaoic 
z, FirstLesrr. 
L_A_C, #C1H 
nz, CLEARRACIC 

L_A_C, #072H 

SET_UF_DIF_STATE 

CLEARRADIC 

LAC, *:~2h 



; flag got matching E code 
; flag for aobs bypass 



; If we were positioning the up limit, 
; then start the learn cycle 

; If we had an error, 

; re-learn, otherwise ignore 

; Set the re-learn state 



Se: 



:e learn state 



frorr the "uc lint" 



KormalRadic : 



marx the la; 



commano as raci 
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Id RADIO_CMD, * OaAH 

jp CLEARRAOIC 



set the radio command 
return 



LightTrans : 



clr 

cp 

DP 
Id 

jp 



RTC 

ONEF2 , #0C 
nz, NOTNEWKATCK 
SW_DATA, #LIGH7_SW 
CLEAR RADIO 



; Clear the radio timeout 
; Test for the 1.2 sec. time out 
; If it isn't timed out, leave 
Set a light command 
; return 



OCSTrar.s : 



CP 

DP 

cp 

DP 

clr 

cp 

DP 

cp 



SCISAELE, *22 
ult, KOINE K MAT C h 
VAC FLAG, #CCH 
nz, NOTKEWKAT CH 
RTO 

OKEF2, * C C 

nz, K 0TNEWMA7 CH 

SK_E, K2 

nz, CloseOrStop 



Test for 4 second system disable 
; if not done not a new code 

If we are in vacation mode, 

; don't obey the transmitter 

; Clear the radio timeout 

; test for the 1.2 second timeout 

; If the timer is active the skip command 

; If the open button is pressed, 
; then process it 



Ops 



cp 
D- 

CP 
CP 

ic 

cal 



STATE, fSZZr 
z , Open'Jp 
state, 4=c::_fcs:t: 
z, Oper.Vp 

state, ±on_iirec: 

nz, OCSExit 

reason, 

set_arev_state 

OCSExit 



; I: we are stopped cr 

; at the down limit, ther. 
; begin tc move up 

; 

; If we are moving down, 
; then autcreverse 
; Set the reason as radio 
; 
; 



OgenCt : 
L 

atSExil 



1c REASON, *:i:-h 
call SET_Tr_EI?_STATE 

jp CLEAR ?_AC Z Z 



; Set the reason as raoic 



CfebseCrStcp 



SV." E , * - 1 



; If the stop butter, is pressed, 
; tr.er. process it 



;tc F =u 



cp 

D r 
cp 

cp 
- r 
jr 



STATE, i'Z: 
z, Stoplt 
STATE, * ON 
z, Stoplt 
STATE, #AT 
z, Stoplt 
OCSExit 



erection 
:irection 
; rev 



If we are moving cr ir 
the autcreverse state, 
then stop the door 



CicseEittcn : 



Id REASON, *C1CH ; Set the reason as radio 

call SET_STC?_STATE 
i: OCSExit 



STATE, #"? POSITION" ; If we are at the up lirr.it 

2, ZZzssl-~ : cr stepped ir. travel, 

SZr.ZZ, =ST0r ; tr.er. send tne aocr down 
z, Closelt 
OCSExit 
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Closelt : 



Id REASON, #C10K 

call SET_DN_DI RESTATE 
jr OCSExit 



; Set the reason as radio 



SetMask: 



and 

tIT, 

Dr 
cr 



InDowerByte : 



trr 
~i r 



EightOrTwelve : 



ZeroOrFour : 
LSNybbie : 

FqjprCrTwelve : 

lifzl rZ.g:.- : 

CI 

TE&TCODES : 



Q 

ru 
o 

RgjlCheck 
NEXT CODE : 

RAVEKASK: 



Id 

Id 
trr. 



ar.o 
ret 



ar.c 
re" 



Id 

call 

1 2 
trr. 
jr 
cl r 
clr 

clr 



RFiac, #Cllllillb ; Reset the page 1 bit 

ADDRESS, #11110CCCb ; If our address is on page 1, 

z, :r.'-cwe:5.".e ; tnen set the proper flag 

RFiag, #:::::::ce 

ADDRESS, 4* C- C'C C 1 1 C C Cc ; Binary search to set the 

z, ZeroOrFcur ; proper bits in the bit mask 

BitKask, *niic:cio 

LSNybbie 

EitKask, ±o:::iiiir. ; 

add? ess , * ; : : : ;i : :^ 
z , lercCrEicr.t 

B-.zl-'.as:, *lli:illCr. ; 
5it:-:as'-., *::ii::iir. ; 



y.zzy.: 



address, #?ty?ea:: 
reaoxeko? 
RaaitTyte: 
RTypes: 
RadicMode, #F,01.1_MAS:-' 
nz, RoUCnec. 
RadicTypes 
PCypes2 

ADDPESS 



the raaio type£ 



call 


SetXas ■ 


ar.c 


E.tXas - , 


cal 1 




CP 


K7EXP--1, raa- : lr. 


i r 


nz, KCM-.T CH 


cp 


KTEMrD, raoic 11 


]r 


nz,NOXA7Cr 


inc 


ADDRESS 


call 


READKEKORY 


trr 




jr 


nz, CheckOCSl 


cp 


CodeFlag, ±1FNCDS 


3? 


z, Cr.ecxCCSl 


cp 


MTEXPK, ra = ic3r. 


jr 


nz , N0KATCH1 


cp 


MTEKFL, radic31 


jr 


nz,N0KATCK2 


ret 





; start address is C 

; Get the approprite bit rr.as-: 
; ; Isolate the cirrer.t trar.sr.tter types 

; read the word at this address 
; test for the match 

; if net matching then dc next address 
; test for the match 

; if net matching then dc next address 
; set the second half of the code 
; read the word at this address 
c ; If tms is an Open/Close/Stop trans., 
; then do the different check 

; If we are in open/close/stop learn mode, 
; then do the different check 
; test for the match 

; if not matching then dc the next address 
; test for the match 

; if not matching then dc the next address 



; retu: 



sith the address cf the ma* 



sir. KTEXPI, raoicll ; Siotract tr.e raoio fror tr.e memory 

sbc MTEKrH, radic3h 

cr CcoeFla;, *1RND?S ; If we are trying tc learn open 'ccse stc 

Positive ; tnen we mist complement tc be positive 
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nz , 



) 



Positive : 



NOMATCK: 
NOMATCK2 



corr! 
corr. 
add 
adc 

cp 

cp 

ret 



mc 
tm 

j r 
mc 
ir.c 
cp 
- r 



At^extAdc : 

01 

GipNOMATOr. : 

w 

J: 



cp 
"i r 



iC 
re: 



ry 

# 



anc 
clr 
Id 

:f 

cV.Fast : 

; Fropnel 
; rcllir.c 
; Cures t: 



MTEMPL 
MTEMPK 
MTEMPL, #1 
MTEMPK, #0 

MTEMPK, #00 
nz, N0KATCK2 
MTEMPL, #02 
ugt, NOMATCK2 



ADORE' 



; Switch from ones complement to 2's 
; complement 

; We must be within 2 to match properly 
; 

; Return with the address of the match 
; set the address to the next code 



ADDRESS ; set the address to the next code 

RaoioMcde, #E0DD_MASr' ; If we are in fixed mode, 

2, AtNextAdo ; then we are at the next address 

ADDRESS ; Roll mode -- advance past the ccur.te: 

ADDRESS 

ADDRESS,*:Ch ; If we are on the second page 

nz, AtNextAoc ; tr.er. get the other tx . types 

RaaicTypes, ?Types2 ; 



ADDRESS, f 2 2.-. 
ult, NEXTCODE 



ADDRESS, ¥ Z FFH 



PTO 

RFiac, #:::::: 

rad: cc 

dear;", #offk 
radio exit 



; test for the last address 

; if nor the last address then try agai: 



set the nc match flag 
; and return 



; reset tr.e radic time o-t 

; clear radio flags leaving relieving 
; clear the radio bit counter 
; set the learn timer "turn off" and backup 

; return 



v. c e r r c 



ar-. algcritr.r fcr maintair.ir.g 
ccae ccu-.ter 

: eitr.er Kat c.-.Cccc., UpdatePast cr CLEAF.P_-.2IC 



UpdateFas: 



C".~A?pZ- ' 



CLEARFJ-._i; 



CLE.--?.: 



SKI PR" 



Id 


LastMatcn, A0DF-.SS 


; Store 


the last fixed cose receives. 


1c 


FCcur.terA, MirrcrA 


; Store 


the last counter received 


lG 


PCcunterE, MirrcrE 


; 




id 


PCounterC, MirrcrD 






lG 


PCounterD, MirrcrD 






Id 


LEARNT, # 0 FFH 


; Turn 


off the learn mode timer 


clr 


CodeFlag 






. IF 


TwcThirtyTnree 




; clear the bit setting direction to 


and 


IRQ, #0Cllliii3 




. EKD 


IF 






- 


F I!;FI DTI? , * Z FFH 




; set flag tc active 


tr 


F.riao, 




; test for receiving without errcr 








; if flag net set tr.er. a::.:: zlzt- t 




ft: 




; clear radio timer 




raoicc 


; clear the radio counter 


cli 


RF^ag 




; clear the rauio flag 
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clr ID_B 

jp RADIC_EXIT 



Clear the ID bits 
return 



TCReceived : 



cp L_A_C, #C7 0H 

jr uge, TestTr ar.cate 

cp FAULT FLAG, #OFFH 

jr z, Test Truncate 

and ledpcrt, (ileal 

i: Tes:Tr:r.cate 



; Test for in learn limits mode 

If so, don't blink the LED 
If no fault 
turn on the led 

; 

Truncate off most significant digit 



TruncT; 



sue RadiclL, #0E3r. 
sbc RadiclH, #C4Cr. 



; Subtract out 3" 9 to truncate 



TestTruncate : 



# 

=11 

w 

u 
4= 
u 



check:: 

O 

ru 

O 
O 

O 



cp 

jr 
- r 

cp 



cal 
cp 
jr 
cp 



cp 
- r 

cp 
j r 

cal 
CP 

:? 

cp 
i r 



id 
la 

id 
la 
Id 
Id 
dec 
cal 

Id 
Id 

cp 

cp 

:? 

CP 

jp 

:p 



RadiclH, *Z~.Z: 
ugt, Trur.cTC 
uit, Get" 
RacirlL, *:E3: 
_ge, Tr_-.rT: 



aggress, *tgugk:: 
reagmemg?':' 
l_a_c , # : ~ : :-. 

uge, Cr.ec kIG 
FAULT FLAG, ?:FFH 
z, ChecKi: 
ie=p:r-, *le — 

MTEKrH, RadicSH 
nz , CLEARRAGIG 
MTEMrL , Racic3L 
n z , C LE ARRAS I C 

Test Gc _r.ter 
c:-:s, *E0UAL 

c:-'?, *fv;_ .•::•" 
r.z, clzar?a::c 

-- upcaze i 

count::-:, ? = = ic::- 

C0UNT1L, RadiclL 

RaaiclK, KirrcrP 

RaaicGL, MirrcrE 

Radio3H, MirrcrC 

Radi=3L, K:rr:r: 
AUG? ESS 

wr:teggge 
RadiclH, countih 

RadlciL, COUNT 1L 

CcceF-sr. *N 0? '•!-.: 
z, Ncr-T: 

CodeFlag, *L?N . :l:-:.~ 
z, Learr.TUr 
CooeF_ar, *L?NIU?T:. 
2, Learr.Gir 

CLEAR r_- 



; If we are greater than 3" 9, 
; truncate down 



; Check to make sure the IG code is gc 



; 

"est for in learn limits mode 
If sc, aon't blink the LEG 
; If no fault, 
; turn off the LEG 



; Test the roiling code ccunte: 
; If the counter is equal, 
; then call it tne same code 



; Back up radio code 



; Write the counter 



; Restore the radio code 



; Find and :ump tc current rede 
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Id ADDRESS, #TO'JCK?ERM ; Compare the four-digit touch 

call READMEM3RY ; code to our penrianent password 

cp RadioIK, N7EKPH- 

■jz nz, CheckTCTemp ; 

cp RadiclL, MTEKFL 

jr nz, CneckTCTemp ; 

cp SW_E, CENTER ; If the ENTER key was pressed, 

jp z, RAIIOCOMMAi;! ; issue a B code radio command 

cp SK E, *?C"N'I ; If the user pressed the pound key, 

ir z, TCLeair. ; enter the learn noae 

; Star key pressed -- start 3C s timer 

clr LEARNT ; 

1c FLASH_CO'JKTEF , K£h ; Blink the wcrklight three 

Id FLASH_DELAY , *FLASH_TIKE ; times quickly 

la FLASH_FLAG, * Z FFH 

Id CodeFiag, #LRNTEHP ; Enter learn temporary mode 

jp CLEARRADIC 

io FLAS--:_CO"J:N'TEF , ; Elir.-c tne wcrklight twc 

lc FLASH_DELAY, *FLASH_TIKE ; times quickly 

1c FLASH_FLAG, f - FFr. 

pusr. ?,? ; Enter learn mode 

srp #leafnee_gf f 

call SET LEARN 

pop RF 

id ADDRESS, #TO'JCHTEy.F ; Compare the four-digit touch 

call READMEKOF % . ; code to our temporary password 

cp Raciclh, MTE:-:?H ; 

jt nz, CLEARRA1IT 

cp Racicll, KTEXFL ; 

:p nz, cleiffaiic ; 

cp STATE, * DN_FCSITIO:: ; If we are not at the acwr. limit, 

np t.z, FAIIOCOKMANI ; issue a command regaraless 

Id AC DRESS, *DDFAT ; If the duration is at zerc, 

call READKEKC? Y ; then don't issue a commano 

cp KTEHFL, tZZ 

jp z, CLEARRAT.II 

cp KTEKFh, # ACTI .'AT I CNS ; If we are in number cf activations 

jp nz, RADI OCOMKAN I ; mode, then decrement the 

dec KTEMFL ; number cf activations left 

call fc'EITEMEMDFY 

jp RADIOCOMKASD 

cp SK_B, #ENTEF ; If the user pressed a key other 

3P nz, CLEARRADIO ; then enter, reject the code 

lo AIIFESS, cT D'JCHrEFX ; If the ccae enterea r.atcnes zr.e 

call READXEMCFY ; permanent touch coae, 

cp F.a-irl-, ::TE::?:- ; then re;ect tne czdz as a 

:p nz, TempSccc ; temporary code 

cp RadiclL, KTEMPL 
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TempGood : 



Id 
Id 
Id 



ADDRESS, fTOUCKTEKF ; Write the code into temp. 



MTEMPH, RadiolK 
KTEMPL, RadiciL 



call WRITEMEMORY 



code memory 



lc FLASH_COUNTER, #CSr. ; Blink the worklight four 

Id FLASH_DELAY, #FLASh_TIKE ; times quickly 

Id FLASH FLAG, <■ C FFH 



Star' 



5 c ime r 



clr LEARNT 

Id CodeFlao, tLRND'JRTK ; Enter learn duration mode 

jp CLEARRADIC ; 



Lea ml 



- r 
IF 



Radiolh, KC 
nz, CLEA.RRAD: 

sv:_b, p~z':::z 

z , !.~I.r = ::: 
sv;_£, *STA_? 
z, Hi-rsl'jr 

clea.rf.aitc 



; If the duration was > 255, 

; reject the duration enterec 

; If tne user pressed the pound 

,- key, r.um-oer of activations r:se 

; If the star key was pressed, 

; enter the timer mode 

; Enter pressea -- reject code 



Nuar.Dura: 



kte:-'.?:-:, #attiva: 

Duraticnln 



; Flag number of activations moce 



Hours. 



KTEKrr , *HCT?5 



Flaa number cf hours mode 



Duratior.In : 



lc mte::?l, Racic: 

lc ADDRESS, «=DY?J 

call k?ite::e!-:c? : 



; Load m duration 

; Write duration and ircae 

; nonvolatile memory 




; Give the light one blink 
; lasting one second 

; Clear the learn flag 



Test Rolling Coce Cou 
Note: Counter A- C wil 



nter S^crrutme 

1 be usee as temp registers 



TestCcunter : 



push 


R? 




srp 


#CounterGrour 




inc 


ADDRESS 


; Point 


call 


READKEKDR: 


; Fetch 


Id 


counters, KTEKPK 




Id 


court err, I-'TEY? L 




in z 


AIIFESS 


; ?r-r.' 


call 


READXEXD? Y 


; Fet cr. 


Id 


::.:.:er:, l..-..r 




lc 


courieic, >:te::?l 




; 


Subtract clc :c-:.:e: 


ccuntera-d 



frcrr current 
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counter (rr.irrcra-d ; aria store in countera-d 



core 


counters 




cor. 


counterb 




coir. 


counter c 




cox 


counterd 






cour.terc , 


T J 1 1 * 


adc 


counterc, 


#0 0K 


adc 


counterb , 


#0Cr. 


adc 


ccr.te:; , 


# : : - 


sod 


counterc , 




aac 


counterc , 


rr.irrcrc 


adc 


counterb , 


rrirrcrc 


adc 


counters , 


rr.i rrcra 



; Obtain twos complement of counter 



; Subtract 



If the r.sb cf ccir.terd is negative, checK to see 
if we are ir.siae the negative window 



c*. 



cxBa z <V.'ir. : 



IripacKV;.- : 

b 

ry 
o 

5n£ r .•:F*oV. i r. 

6 



Z r 
ct 



ccur.tera, *CFF.- 
r.r, 0ucCfV.ir.3c 
counter z, # Z 77 r. 
nz, OutCfVfir.dOv. 
counterc, * C FC-. 
ult, OutCfKinocv. 



cm?, ^backv;::; 

Corr.r Dene 



-tera, *:1H 



nz, CutCf Kmoov- 
cc jr.- err, #CCK 
u;; . t 1 : Wir.s: 



ChecK tc see if we are 
less than -04C:» 
(i.e. are we greater than 
OxFFFFFCC C-H 



Return ir. back window 



ChecK tc see if we are 1? 
thar CCZl = 1C24 

activations 



cr. cc inter r, Kv: 

nz, InrwaV.'ir. 
c: counterc, 
:r nz, ir.FwdWm 



CountersEqual : 



Id 



Ir.Fwd'Ain: 



ci-:?, *>l;i".-.: 
Coir.p Tone 



/Return equal counters 



Id 



CMF, #FWDWIN 



/Return in forward window 



OutlfXinct, 



; Return c. 



anv wino: 



C=-?:-.r.e: 
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I 



pop RF 
ret 



Clear interrupt 



ClearRadio : 

cp 
jr 

tm 



RadioMode, #ROLL_TEST 

ugt, modedo:;e 

T12SMS, fcCOOOOCClc 
z, SET?CEL 



;If in fixed or rolling mode, 
; then we cannot switch 

;Zf our 'com toss' was a zerc, 

set as the rolling rooae 



SETFIXEE : 



Id RadioKode, *"XEI_ 

call FixedKur.s 
jp KODE3CNE 



c-r 
clr 
c Ir 



SETROLL : 



O " 

M#|)EDONE 

m 

m 
w 
u 

F-fETU?^:. : 

: re 

s 

BfexedKur.s : 

1:3 

ru 
o 
o 
o 



ic 
Id 



RcllK JL~S 



Rac:cT:r.€j.: 

Radio: 

RFiag 



R? 



EitTr.res:., #F;XTK? 
SyncTr.resr., *FIXSV: 
Max.Eits, * FIXE 1 7; 



; clear raaic timer 

; clear the radio counter 

; clear the radio flag: 



; reset the RP 
; re:;rr. 



RcllNur.s : 



la 
la 
1 c 
re: 



BitTr.resr., *Z~. 
SyncTr.resr., *: 
KaxErts, *ZBZ' 



rotat< 



.rror LocpCour.t " 2 then aaa 



Rota teMirrcr Add: 



rcf 
ric 
rlc 
rlc 
rlc 
d-.n: 



mi rror a 
mirrcrc 
Eirrcrt 
itinera 

loopec-r.t , PctateM 



irrcrAd: 



; clear the carry 



; lcop till done 



; J-.QO 



AddXirrcrTc: 
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) 



aad counterd,mirrord ; 

adc counter c, mi rrorc ; 

adc counterb,mirrcrb ; 

adc countera,mirrcra ; 
ret 



; LEARK DEBOUNCES THE LEARN SWITCH SOrnS 

; TIMES OUT THE LEARK MODE 30 SECONDS 

; DE50"JNCES THE LEARN SWITCH FOF ERASE € SECONDS 



LEARN: 



srp 


#LEARNEE GRF 


; set the register pointer 


cp 


STATE, #DN POSITION 


; test for motor stoped 


jr 


2 , TESTLEARN 


; 


cp 


STATE, #UF POSITION 


; test for motor stoped 


jr 


z, TEST LEARN 


; 


CF 


STATE, #S?OF 


; test for motor stoped 


3- 


2 , TESTLEARN 


; 


cp 


L A C , # C 7 4 H 


; Test for traveling 


- r 


2 , TESTLEAP.N 


; 


la 


learnt , # OFFH 


; set the learn timer 


:? 


learnt , *I4 ' 


; test for the learr. 30 se:cr.i tiirec 


3 r 


nz , ERASETESI 


; if not tr.er. test erase 




learnof f 


; if 30 seconds then turn off 



□ 

IpST LEAF N : 

_£$ cp learndc, #23€ 

='7s ;r nz, LEARNNCT RE LEASE: 

li; ARN K E L E A 5 E D : 
JfSartRelease : 
=P cp L_A_C, #C70k 

fsi _! r nz, NcrmLeamBreak 



reason, 

set stop state 



LEARN 05 



CodeFlao, #LRNTEKF 
uge, INLEARN 
learndb, *2C 
nz , ERASETEST 

SmartSet 

L_A_C, # 0" 1 OH 
uge , ERASERELEASE 
learndb, #0FFH 
nz , ERASERELEASE 
eraset, # OFFH 
nz,ERASETIMIN3 
eraset 

eraset, #46 
2, ERASETIME 



ledpert, #iedh 
I ~ SKipraoi; , *NDF 

call CLEARCODES 

clr skipraaic 



; test for the debounced release 

; if debouncer not released then lur-.p 



; Test for m learn limits mode 

; If net, treat the break as normal 




; Set the 
; 



reason as comma r.o 



; clear the decounce: 
; return 



;test for learn ir.cde 
; if in learn lump 
; test for debounce period 
if not tnen test the erase pence 



for in learn limits mode 

; If so, DON'T ERA.SE THE MEMORY 

; test for learn button active 
; if button released set tne erase time: 
; test for timer active 
; if the timer active jump 
; clear the erase timer 

; test for the erase period 
; if timed out the erase 
; else we return 

; turn off the leo 

; set t.-.e flac tc s-'.-t tne : = ::: 
; clear ail codes in i-.er.cr_. 
; reset the flag to skip racic 



1c 



learnt, #GFFh 



; set the learn time: 
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clr 
ret 



CodeFIag 



return 



SmartSet : 
cp 
jr 
Id 

call 
jr 



L_A_C, #07 OH 

nz, NormLearnMakel 

REASON, #C0K 

SET_DN_NOBLINK 

LearnMakeDone 



NormLearnMakel : 



cp 
jr 
Id 
Id 

call 



nz, Ncrir.Learr.Xa<e2 
L_A_C, #C7 5H 
REASON, #CGh 
SET_AREV_STATE 
LeamKa ne Dene 



NormLearnNake2 : 



o 
m 
m 



clr LEARNT 

la CodeFIag, #REGLE; 

and ledpert , #iedi 

clr VACFLAG 

la ADDRESS, #YADATIC: 

clr KTEMRH 

clr KTE!:?1 

ic skipraiic, *ndeed: 

call WRITEKEKOrY 

clr SKIPRADIC 



:df 



L esr TiM a k e D c n e : 

=~1 Ic LEARN I B , * ' 

m ret 



FFr. 



ERiiSERELEASE : 



Id 



!□ 

Iff|£ARN 

6 

O Ic 
TEl T LEAR. N TIKE? 

cr : 



eraset, #0FFH 
le arr.cr , r 2 1 £ 

z, lear.nr.elease: 



CP 



learncc , #2 Z 
learr.ac, * I F! 



; Test for in learn limits mode 
; If not, treat normally 
; Set the reason as command 



; Test for traveling down 

; If not, treat normally 

; Reverse off false floor 

; Set the reason as command 



; clear the learn timer 
; Set the learn flag 

; turn on the led 
; clear vacation mode 

; set the nor. vol adaress for vacatic: 
; clear the data for cleared vacaticr. 
; 

; set the flag 
; write the memory 

; clear the flag 

; set the denouncer 



; turn off the erase timer 
; test for the debounced release 
cencur.cer not released then jump 
; return 

; test for the debounce period 

; if not then test the learr. timer fcr.time 



learncf f : 
cr 
Id 
Ic 

3r 



learnt, *24 
r.l,E?--.5E7ES7 

ledpert, tlec 
learr.t, *C F Fr 
learndt, *:FF.- 
CoceFlag 
ERASETEST 



; set the learn dr. 

; test fcr the learn 30 second tir.e::: 
:t then test erase 

; turn off the led 
; set the learn timer 

; set the learr. debcunce 
; Clear ANY code types 
; test the erase timer 



WRITE WO? D TO MEMORY 
ADDRESS IS SET IN REG ADDRESS 
DATA IS IN REG MTEKPH AND KTE'-;? I 
RETURN ADDRESS IS UNCHANGED 



WRITEMEMOPY: 



push 


RP 




srp 


*LEA?NE 


I_G?F 


call 


STARTE 






serial , 


* . . . - 


c = l _ 


Sr-r I.-.1C 




and 


csport , 


tcsl 


call 


STARTE 




Ic 







; SAVE THE RP 
; set the register pointer 

; output the start bit 

; set byte to enable write 

; output the byte 
; reset the chip select 

; output the start bit 
; set tne byte for write 
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I 



> 



or 




; or in the address 


can 




; output the byte 


xc 


serial r ni'tcinp)* 


; set the first byte to write 


call 


CCD TAT fVlT 


; output the byte 


la 


serial > nit 1 


; set the second byte to write 


/-all 

ca i i 


erpT HT OTTT 


; output the byte 


call 


ENDWK11 L 


; wait for the ready status 


La-. j> 


& X J. c 


; output the start bit 


Id 


serial, #OOO00OO0B 


; set byte to disable write 


call 


SERIALOUT 


; output the byte 


and 


csport, #cs 1 


* T-oeo*" T" H ^ rhl fl 1 Pft 


or 




; Change program switch back tc read 


Id 


P2K7F2K shadow 




pop 


RP 


; reset the RP 


ret 






****** 


***************************** 


********************************* 


WORD 


FROM MEMORY 





ADDRESS IS SET IN REG ADDRESS 
DATA IS RETURNED IN REG MTEMFK AND MTEM PI- 
ADDRESS IS UNCHANGED 



READMEKDPY : 





push 


RP 








#LEARNEE_G? ? 


; set the register pointer 




Call 


START5 


; output the start bit 




Id 


serial, #ioo:c::-:r 


; preamble fcr read 




or 


serial , address 


; or ir. the address 




call 


SERIALO'JT 


; output the byte 




call 


SERIALIN 


; read the first byte 




Id 


mtemph, serial 


; save the value ir. mtemph 




call 


SERIALIN 


; read teh second byte 






ir.t err.p 1 , s e r i a 1 


; save the value in ir.ter.pl 




ST. C 


csport, *csl 


; reset the chip select 




or 


P2K SHADOW , # c 1 oc kr. 


; Change prograir. switch back 




Id 


P2K, P2K_SHAD0W 






pop 


RP 






ret 







;Q*RITE CODE TC 2 MEM 0? Y ADDRESS 

T CODE IS IN RADI01H RAIICIL RA1IC3K RA"03L 



WRITECODE: 



push 
srp 
Id 
la 

call 

inc 

Id 

J. C 

call 
pop 



RP 

# LEARN EE GRP ; set tne register pointer 



nst eir.ph , Ra d i c 1 K 
rr.terp 1 , Raoicll 
WRITEMEMORY 
address 

mtemph, Radio3H 
ir.templ , Raaic2 L 
WRITEMEMORY 
RF 



transfer the data fro~ radio I tc the temp 

write the temp bits 
next address 

transfer the data from radio 3 to the temp 
write the temps 

return 



.^j**************************************************** 1 

'; CLEAR ALL RADIO CODES IN THE MEMORY 



r ***** t 



r************< 



r**********1 



CLEA-- 



push 
la 



RP 

»LEARNII_Gr ? 
MTEK?:-:, #CFFr 
MTEMPL, *CFF» 
address , * 0 II- 



set tr.e register pointer 

set the codes to illegal code; 



; clear address 0 
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CIiEARC : 





call 


WRITEMEMORY ; "AO" 






ir.c 


address 


; set the next address 




cp 


address, # (AddressCounter - 1) 


; test for the last address 




jr 


ult, CLEABC 






clr 


mt emph 


; clear data 




clr 


roteir.pl 






call 


WRITEMEMORY 


; Clear radio types 




Id 


address, #AddressAPomter 


; clear address F 




call 


WRITEMEMORY ; 






1 a 


address, #MODEADC? 


;£et EE PROM memory as fixed test 




Call 


WRITEMEMORY 






Id 


RadioMode, *FIXED_TEST 


;Revert to fixed mode testing 




la 


BitThresh, #FIXTHF. 






Id 








Id 


MaxEits, #FIXBITS 




CodesClearec 










RF 






ret 




; return 










; fe 


o eit 


FOR SERIAL K0K70C 




; Use 


SETS 


DATA DIRECTION AND AND CS 














ar.3 


F2K SHAOCV;, «,c1cck! £. del, 


; Set output mode for clock 




id 


F2M, F2M_SHAD0V; 


; I/O lines 


jo 


and 


cspcrt , #csl 


; 




and 


c 1 kpo r t , £ c 1 c c k 1 


; start by clearing the bits 




ana 


dicpcrz, *ac 1 


; 


a 


cr 


cspcrt, Tcsn 


; set the chip select 




cr 


diopcrt , #aoh 


; set the data out high 


Q 


cr 


elkpert, #c!ccKh 


; set the clock 


Tii 


and 


elkpert, #clcckl 


; reset the clock low 


O 


ana 


dioport , *del 


; set the data low 


Q 


ret 




; return 


















; en: 


or cc: 


E i-.TITE 





ENDWRITE : 
an; 
r.z-z 
cr 
cr 
la 

ENDWF.ITECOOF : 
Id 
ana 
jr 
ana 
cr 
and 
Id 
ret 



cspcrt , * cs 1 

cspcrt , * :sr. 
P2K_SHACCV, , *acr. 
P2M, F2M_SHAD0W 

temph , di opcrt 
temp.-. , tscr. 
Z , ENDWRITELOOF 
csport , * cs 1 
F2M_SHAD0W, #cic: 
F2M_SHAD0W, #dcl 
P2K, P2M SHADOW 



; reset the chip select 

; delay 
; set the chip select 

; Set the data line tc input 

; set port 2 mode forcing input mode dat£ 

; reaa the port 
; mask 

; if the bit is low then loop until dene 
,- reset the chip select 

; Reset the clock line to read smart b-ttcr. 
; Set the data line back to output 
; set port 2 mode forcing output moae 



? 

; SE? I AO CYC 

; GOTFVC THE BYTE I!; SEFIA1 
SERIAOCVT : 

ana F2M_SKAOOV.", # • aci & cIcckI; ; Set the clock and data lines tc outputs 

1= F2M, ?2M_£HAC0V; ; set pert 2 mode fcrcir.g c_tpit ncae ca: 

1c tempi, #Eh ; set the count for eignt bits 
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SEF.IALOUTLOOP: 



rlc 


serial 


; get the bit to output into the carry 


jr 


nc, ZEROOUT 


; output a zero if no carry 


ONEOUT : 






or 


dioport , #doh 


; set the data out high 


or 


clkpcrt , #clockh 


; set the clock high 


and 


clkpcrt, #clockl 


; reset the clock low 


ana 


dioport, #doI 


; reset the data out low 


d 3 nz 


tempi , SERIALOUTLOOF 


; loop till done 


ret 




; return 


ZEROOUT : 






and 


dioport, fcdcl 


; reset the data out low 


o r 


clkport, fcclockh 


; set the clock high 


and 


clkpcrt, fcclockl 


; reset the clock low 


ano 


dioport , fcdcl 


; reset the data out low 


dinz 


tempi, SERIALOYTIOOF 


; loop till done 


ret 




; return 








; SE=7^L IN 






;=' = 3|N?"J7S .-. BYTE TC SIrlAL 




SjS^.I AEIN : 






or 


F2Y SHADOW, *acr. 


; Force the data line tc input 


=J I a 


P2K,F2X SKADDVC 


; set port 2 mode forcing :r.p:t 


Lij io 


terpl , #SK 


; set the count for eight cits 


SERIAL. I N1.0CF 






or 


clkport, #ciockh 


; set the clock high 


rcf 




; reset the carry flag 


Id 


teirph, dioport 


; read the port 


3 £ T. C 


te-pr., tec:. 


; ir.ask out tne bits 


i I ^ 


z , DON', si. 




L=r. SCf 




; set the carry flag 


Dg>l\TSET : 






^ ~~ r - c 


SGris. 


; get tne bit into the cyte 


and 


clkport, fcclcckl 


; reset the clock low 


djnz 




; loop till done 


ret 




; return 


; TIME? UPDP 


.TE FROM INTER j?7 EVERY C . 


2ScrS 


SkipFuise : 






; tr 


SKIPRADIC, #NCIN7 


; I f the 'no radio interrupt' 


3 r 




; f lac is set, just leave 


; or 


IKR, #RadioIir.r 


; turn on the radio 


;NoPi;ise : 






iret 






TIMERUD: 






tir. 


SKIPRADIO, #NOINT 


;If the 'no radio interrupt* 


3 r 


nz, NoEnabie 


; f lag is set, just leave 


or 


IMR, #RadicIrr.r 


; turn on the radio 


NeEr.arle : 






G€CV 


TDEXTWC?,: 




TCExtlor.e : 


P2 , #LIKr.IN"FIK 


; Test the AC line m 


J " 




; If it's lew, nvarr. zerc crossing 


¥. i g hA.C : 







Page 69 of 97 



inc 
jr 

LowAC : 

cp 

jr 
Id 
cir 
Id 

LineDone : 

cp 

jr 

cp 

jr 

dec 

jr 

PhaseOff : 
ar.d 
jr 

Phase Or.: 

o cr 

FhffeDcr.e : 
cSpy.CE: 

e s 

M: dec 



De 



IngR 

G 



inc 
flJ aec 



Q 



i-cerec : 

cp 
- r 
cr 



LineCtr 
LineDone 

LineCtr, #0S 
ult, KighAC 
LanePer, LineCtr 
LaneCtr 

PhaseTMR, PnaseTime 



Pcwerlevel, 
uce, FhaseCr. 
FoveiLevel , *CC 
z, PhaseOff 
PhaseTKF 
mi, Fr.aseOr 



PhaseFrt, #~Fr.aseKigr. 
PhaseDo-ne 



Fr.aseFrt, «.-:.5se- 



VectcrRFKLov 
cir 
- >- 

VectcrRFXHi: 
Is 



P2, *;o::::::c 

r.:, In;??:Cr 

R?K_FIL7ER, 

z, R?y.Filterec 

RPM_FILTE? 

RF.XFilcerec 

RPK_FILTER 

nz, RFXFilterec 

RPK FILTER 



rfk_f:lte? , 

z, YectcrRFKHig-. 

rf::_f:l7E? , * lit 

r.z, : = £•::.>;:;:-;: 

FFK_FIL7EP 
Tas<Switcher 

RPK FILTER, KFFr. 



; Count the high time 



If the line was low before 

; then one-shot the edge of the line 

; Store the high time 

; Reset the counter 
Reset the timer for the phase control 



; Test for at full wave of phase 
; If net, turn off at the start cf the phase 
; If we're at the minimum, 
; then never turn the phase control on 
; Update the timer for phase control 
; If we are past the zero point, turn cr. tr.e 



; Turn off the phase control 
; 



cr tr.e phase centre. 



; Test the RPK in pin 
we're high, increment the filter 

; Decrement the value of the filter 
; we ' re not already at zero 



; Increment the value of the filter 
; and bacK turn if necessary 



; If we've seer. 2.5 rr.s cf hi or. time 

; then vector high 

; If we've seen 2.1 rrs cf lev. time 

; then vector lev. 



TaskSwitcr.er 

tm 
jr 

trr 
jr 
trr 
ir 
tm 
jr 



toext, r :cc;c::ic 

nz, SkipPulse 

toext, *o:o: :: ; :r 

nz, TASK! 35" 

toext, *cc;oc:ooc 

z, TASK 04 

TOEXT, *000CIC00k 

nz, TASK£ 



; skip everyother pulse 

; Test for odd numbered task 

; If so dc the 1ms tamer update 

; Test for task 2 cr 6 

; If net, then go to Tasks C ana 4 

; Test for task 6 

; If so, jump 

; Otherwise, we must be in task 2 



IMF , ±? 177?*: 
S7A7EM-.Chi:; 



iret 



; turn on the interrupt 
; oc the motor function 
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or IMR, #RETURN_IKR 
ei 

push rp 

srp #TIMEF_GROUP 

call switches 

pop rp 
iret 



; turn on the interrupt 

; save the rp 
; set the rp for the switches 
; test the switches 



TASK6 : 



IMR, *RETV?:: IM? 



cr 

call TIKEF4KS 
iret 



; turn cr. the interrupt 
; do the four ms timer 



TASK! 357 ; 



push 

or 

ei 



RF 

IMR, #RET'JRN 



turn on the interrupt 



ONEKS : 

o 

LcgferOr. : 

il 

DrJPotDone 

u 

s 

0 

HifherUp : 

6 



f 



otDone 



GcTimer : 



and 
i r 



cr 
mc 



tir 



anc 
D r 



or 



mc 
■ r 



BiockedBearr. : 
NOPAII: 



mc 
cr 



nz, Higr.erlr. 

p3,# ;-DOv;n_C-. 
Dr.tctD:r.e 

p3 , *Dow:;_cv? 

DN_TEKF 

pC , #<JF_COKF 

F3, # ,'~'JF_0V7 
UpFotOcne 

F3, #1"F_0VT 
UF_TEM? 

fot_cov::t 

nz, GcTire: 









r rc 


UP TEXF 




rcf 






r r c 


d:;_tek? 




c: 






id 


UPFGRCE, 


#£3 


sub 


UPFORCE, 


UP TEXF 


id 


DN FORCE, 


#€3 


SUE 


DN FORCE, 


DN_TEXr 


ei 






clr 


UP TEXP 




clr 


DN_TEXF 




srp 


#LEARKEE 


_GR? 


dec 


AOBSTEST 




jr 


nz,NOFAI 




Id 


AOBSTEST, #11 


tin 


AOBSF, #GCI00000b 


j- 


nz, Elcc 


kedrea- 


cr 


AOrSr , =_ 




c r 







RadicTiiteCut 
oes_coi". , :t, #: 

z, TEST125 



; Test down force pet. 

; Average too low -- output pulse 

; take pulse output low 



; Output a high pulse 

; Increase measured duty cycle 

; Test the up force pot. 

; Average too lew -- output pulse 

; Take pulse output low 
; 

; Output a high pulse 

; Increase measured duty cycle 

; lr.crer.ent the total period fcr 
; duty cycle measurement 

; uiviae the pet values bj twe tc crtair. 
; a 64-Ievel force range 



; Subtract frcar 63 to reverse the direction 
; Calculate pet. values every 255 
; counts 



counts 



set the register pointer 

; decrease the aobs test timer 

; if the timer not at 0 then it didnct fail 
if it failed reset the timer 

; If the aobs was blocked before, 
den't turn cr. the light 

; Set the brea/> edge flag 

; Set tne single brea'-. flag 



; Test fcr prctectcr tin-ec cut 

; If it has failed, then Qcr.'t decrement 



Page 71 of 97 



dec 



OBS COUN" 



; Decrement the timer 



PPointDeb : 
DecPPDeb: 

Ir.cPFDer. : 

PP Deb Done : 
TESTI25: 



NJf: : 



OKI 



GheckSpeea : 



di 
tm 

jr 

and 

jr 

dec 

jr 

mc 
and 
jr 
Id 



mc 
cp 

cp 



pop 
i re: 



dec 
3' 



cp 
tir, 



Speea. 



cp 



RampSpeeaL"? 



RunReducec 



cp 
j r 

lr.c 
3 r 

cp 

i r 

]r 
dec 

j r 

Id 
cp 



; Disable ints while debouncer being modified (16us) 
PPointPcrt, tFassPomt ; Test for pass point being seen 

nz, IncPPDeb ; If high, increment the debouncer 

PPOINT DEE , #00C00011b ; Debounce 3-0 

z, PPDecDone ; If already zero, don't decrement 

PPOINT DEB ; Decrement the debouncer 

PPDebDcne 

; Increment 0-3 debouncer 



FPOINT_DEE 
PPOIKT DE5, fcOOOOOOilE 
nz, PFDebDone ; If rolled over, 

PPCIS7 DEB, #00000C11B 



; keep it at the max. 
Re-enable interrupts 



tl25ms 
1 1 2 5ms , # 1 2 £ 
z,ONE2 5KS 
1 1 2 5ms , f 6 3 
r.i , ! C 1 2 5 
FA 'J LIE 

F? 



RsKode, #01 
z, CneckSpeec 
RsKcde ; 
nz, CneckSpeed 

RampFlag, #STILL 
z, StcpMctcr ; 
BLINK_KI, #100C0C00b 
z, StopKctc: ; 
I_A_C, #C~cr. ; 
z, Ncrm.alRarrpFlac 
L_A_C r MZ'Or. 
uae, P;r.?saj:e; 



; increment the 125 mS timer 

; test for the time out 

; if true the jump 

; test for the other timeout 



RamcF! 



#RAK?DOKI 



PowerLevei, MaxSpeed 
uge, SetAtFull 

Powerlevel 
SpeedDone 

PowerLevei, MinSpeed 

ult, RampSpeedUp 

z, SpeedDone ; 

PowerLevei 

SpeedDone 

RampFlag, § FULLSPEED 
MinSpeed, #8 ; 
ugt, FowerAtKir 
fo»erleve., f: 



; Test for not in RS2 32 mode 

If net, don't update RS timer 

Count down RS232 time 

; If not done yet, don't clear wall 
; Revert to charging wall cor.trc- 

; Test for still motor 
If so, turn off the FET ' s 

; If we are flashing the warning light, 
then don't ramp up the motor 
Special case -- use the ramp-down 

; when we're going tc the learned up -i 
If we're learning limits, 

; then run at a slow speea 

Test for slowing down 

; If so, slow to minimum speeo 

; Test for at max. speed 

; If so, leave the duty cycle alone 

; Increase the duty cycle of the phase 



; Test for at min. speed 
; If we're below the minimum, ramp up t 
If we're at the minimum, stay there 

,- Increase the duty cycle of the phase 



; Flag that we're not ramping up 
Test for high minimum speed 

; Set the speeo at 4 0* 



; Set power at 



.or.er ir.inir 



Speedlone 



stop!-:c 
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protection) 
SetAtFulI : 
SpeedDone : 

SixtySpeed: 



clr 

3r 

Id 

cp 
]r 

di 

Srp 

_ c 

Id 

aad 

adc 

ldc 

Id 

ei 

ir 



Power Level 
SpeedDone 

Ramp Flag, # FULLS PEEE 

LinePer, #36 
uge, FiftySpeed 



#RadioC-reup 
pcir.terr., * h I G H S?EE 
pcir.teri, *LOV." ,S?EEL 



pointer. , 



FowerLeve 1 



pomterh, #00K 
addvalueh, ^pointer 
PnaseTime, adcvalueh 

WorkCheoK 



; Make sure that the motor is stopped (FMEA 



; Set flag for done with ramp-up 

Test for 50Hz or 60Hz 

; Load the proper table 

; Disable interrupts to avoid pointer coiiiz 
; Use the radio pointers to do a ROM fetch 

: TABLE 60; ; Point to the force look-up table 

jlA5LE_60) ; 

; Offset for current phase step 
; 

; Fetch the ROM data for phase centre: 
; Transfer tc the proper regist 
; Re-enable interrupts 
; Check the workiight toggle 



Fif tySpeeo : 



ci 
srp 

io 
add 

ECC 

ldc 

la 

ei 

srp 



i*porkChecK : 

3 

u 

ru 

Q 

EBontlnc: 

o i 

SK I F A'JXLE ARtC S >: : 



INC 



cp 



INC LEARN : 



cp 



Co:. 

clr 

in: 

di 

mc 

jr 

dec 

cp 
I r 
dec 

inc 
cp 

ce: 

e i 

mc 

ct 



fcRao-cTrcup 
pc intern, *HIGh SFEr. 
ccir.terl, *i:w SFEEI 
pcmterl, PowerLevel 
pomtern, ¥ZZr. 
aaovaluer. , C e pe inter 
Pr.aseTime , acevalue: 



#LEAR:*EE_G= ? 

EnableWcr kLi c'.t , 
EQ, Tent Inc 
EnanleVCcr kLi gnt 




FAT LIE 

T12SM5 



STISAB1I 
nz, DC12 
STISAELE 

ONEF2, #00 
z , IN CLE ARK 
ONEF2 

learnt 
learnt , *CH 



er aset 
eraset, * C r. 
nz , ERA.SE TC? 



; Disable interrupts tc avoid pointer ccilis 
; Use the radic pointers tc do a ROM fetrr. 
TA~LE_50', ; Point tc the fcrce Icc^-up table 

:aele_5C, 

; Offset for current phase 5te: 
; 

; Fetch tne ROM data for pnese centre 
; Transfer tc tne proper regis 
; Re-enable interrupts 

Re-set tne RP 



;Has the button already been helo fcr 10s' 
;Kcrk light function is added to every 
;125t.s if button is light button is held* 
;fcr 10s will xniate change, if net held 
;down will be cleared m switch routine 

; test for the rollover position 
; if so then skip 
:rease 

; test fcr the rcil position 
; if so skip 

; if net increase the counter 

; call the fault blinker 
; reset the timer 

; incrwease the second watch dec 

; count off tne syscer disable titer 

; if not rolled over then do the 1.2 sec 

; else reset to FF 

; test for 0 

; if counted down then increment, learn 
; else down count 

; increase the learn timer 

; test for overflow 

; if net C s.-'.ic Esc turning 

; 



; increase the erase timer 

; test fcr overflow 

; if not 0 skip been turning 
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ERASETOK : 



dec 

pop 
iret 



eraser 
RP 



fault biinke: 



FAULTS : 



RegFlash: 
FlashOf f : 
FlashOr. : 

FastFlash 

O 

m 

Dcffiults: 

m 
w 

O 

m 
o 

O 



NOPULSE : 



AOBSSH: 

NCACrSFA. 
FIRSTFC : 



mc 
cp 

: r 

cp 
3' 

tir. 
3 r 

or 
jr 

ar.d 
-i r 



FAULTTIME 
L_A_C, #07 CK 
ult, DcFaults 

l_a_c, #c~ik 

z ( FastFlasr. 



cr 

Z - 
clr 
clr 
cp 
3 r 

cp 

3 r 
ia 
jr 

tr 

trr 



Id 
3 r 
cp 
j r 
id 

; - 

trr. 

ji 
cp 

ia 
jr 
cp 
jr 
la 
jr 

la 

s«ap 



c^r 
ar.d 



FAULTTIME, fcOOCCCiCOr. 
z, FlasnOn 

ledport, #iedr. 
NOFAULT 

ledport, #ledl 
NC FAULT 

faulttiv.e, *=::::: :i:r 

z, Flasr.Cr. 
Fiasr.Cf f 

FAULTTIME, 
r.z , FIF5CFAULC 
FAULT TIKE 
FAULT 

FAULT COLE, *05r. 
USE, GOT FAULT 

ck:_lef , *CFF- 
T.2 , TESTAOBS'-' 
FAULT CODE, * C3h 
z, GOT FAULT 
FAULTCODE, *C3h 
FIFSTFAULT 



; increase the fault timer 
Test for in learn limits mode 
If not, handle faults normally 
Test for failed learn 
If so, blink the LED fast 

; Toggle the LED every 250rr.s 



; Turn off the LED for blink 
; Don't test for faults 

; Turn or. the LED for blink 



aoesf, it 

z,NCAC5SFAULT 

acesf, zz 
z,::;?UL£E 

FAULTCODE, ¥Z4r. 
GOT FAULT 
FAULT CODE, *C 4r. 
z , GOT FAL LT 
FAULT CODE, #04.-. 
FIRSTFC 

F3, #coccco:it 

z, AOBSSh 
FAULTCODE, #Clh 
z, GOT FAULT 
FAULTCODE, * Clr. 
FIRSTFC 

FAULTCODE, #02r. 
z, GOT FAULT 
FAULTCODE, #G2n 
FIRSTFC 

FAULT, FAULTCODE 
r .~ . 

FAULTCODE 

ace £ f , #:miioob 



; test for the end 

; if net timed out 

; reset the clock 

; clear the last 

; test for call dealer code 
set the fault 

; test the denouncer 
if net set test aobs 

; test for command shorted 

; set the error 

; set the code 



; test for the skiped aobs p-ise 

; if nc skips then nc faults 

; test for any pulses 

; if nc pulses find if hi cr 1c-. 

; else we are intermittent 

; set the fault 

; if same got fault 

; test the last fault 

; if same got fault 

; set the fault 

; 

; test the input pin 

; -jump if aobs is stuc* r.i 

; test for stuck low in the past 

; set the fault 

; set the fault code 

; test for stuck high in past 
; set the fault 
; set the code 



; set the coae 



; clear the fault cede 
; clear flags 
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FIRST FAULT: 



tm FAULT TIME, #OOOOClllb 

jr nz, RegularFault 

incw HOUR_TIKER 

tern HOUR_TIKER_LO, #C001illlb 

-r nz, RegularFault 



Regular Fa . 



ONE : 



ULT : 



# 

ifiSTS 

y 

SpFA' 
«-- 

I 

a 

f5KE?4XS : 

5 



or 


AOBSF, iOlOCOCOOr 


<=F 


t H _ _ * , * >- - 




z f NOFA'JIT 


Id 


FA J LT F^AG , 4= >. r ► .-. 


CP 


CodeFlag, iREGLEARN 


jr 


z,TESTSCI 


cf 


FAULT, FAULT TIKE 


3r 


ULE, TESTSCI 


tr 


FAULT TIKE , * CO 00 LOO 


j r 


r.z,=:TGKE 


ar.e 


leceert, * le -1 


ret 




cr 


iecpert, *lecr. 


ret 




clr 


FAULT FLA 3 



If one second has passed, 
increment the 60min 

Increment the 1 hour timer 
If 32 seconds have passed 
; poll the radio mode 

Set the 'poll radio' flag 



; test for no fault 

; set the fault flag 

; test for not in learn mode 

; if an learn then skip setting 



; test the 1 sec bit 

; turn or. the lea 

; turn off the lea 

; clear the flag 



Four ir.s timer tick routines and aux light function 



TESTPEF I 00 : 



t r 

oe : 

di 

cir 

cL r 

ei 

3- 

cp 

- r 

Id 

cp 

jr 

di 

clr 

clr 

ei 

clr 

jr 

Lc 
1c 



call 
dec 



r phone? 

z, TESTPE? ZZZ 

r?:-:::;e; 

rfm_count 
br?:-:_count 

rpkicone 

RPKCLEAF , *CCr. 
nz,RPMTDCNE 
RPKCLEAR, 4=1.2 2 
RPK_COUNT, 4>S0 
ugt , FAEEY 

RPK_COUNT 
BRPM_COUKT 

FAREVFLAC- 
RPMTDONE 

FAULTCCUE, K'tr. 
FARE V FLAG, 4= 0 6 Sr. 

? :,=l:.t ~v;:^?-LLGr 
reason, # = ::-. 
set_ar.ev_state 

rpkclear 



; test fcr the end of the one sec ti~e: 
; if one sec ever then test tr.e pulses 
; ever the pence 
; else decrease the timer 

; start with a count cf G 
; start with a count of C 



; test the clear test timer for 0 
not timed out then skip 

; set the clear test time for next cycle .5 

; test the count for too many pulses 

; if toe man pulses then reverse 

; clear the counter 

; clear the counter 



; clear the flag 
; continue 



temp test 



; set the fa„lt flag 
; set tne forced up flag 
; turn eff Light 
; rprr forcing up metier. 

; set the autorev state 



; decrement the tirrer 
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SKI PLIGHT! 



DONOTCB : 



RTOOK : 



SKIPRF.TO: 



cp 
jr 
dec 

inc 
cp 

jr 
cp 

3 r 
clr 



cp 
mc 

Cp 

3^ 



aec 



LIGHT I S , #0C 
z , SKIPLIGKTE 
LIGHT1S 

F_DEAE_TIME 
RTO, #RDRO?T IME 
ult, DONOTCB 
CodeFiag, *LRNC 
uge, DONOTCB 
CodeFiag 

F.T 2 

nz , RTCCK 
RTO 

RRTC , 4? C FFH 
z, SKIFRRTO 
RRTO 

skipraiic, 

nz , LEARNOBCK 
RsKcce, 

pspr rt , *pS~£SK 
LEARN DB, KC 
LEARN DE 



; test for the end 

; down count the light time 



; test for the radio time out 
; if not timed out dorrot clear b 
; If we are in a special learn mode, 
then dor.'t clear the code flag 

; else clear the b code flag 

; increment the radio time out 

; if the radio timeout ok then skip 

; back turn 

; test for roll 
; if so then skip 



; Test for EEPROM communication 
If so, skip reading program switch 

; Test for in RS232 mode, 
if sc, dor.'t update tne debojr.ce: 

; Test for program switch 
if tne switch is closed ccjr.t up 
test for the nor. decrement point 
if at end skip dec 



PR^W ; « 



LEARNEBOK: 



CP 



LEARN EE , * C Fr 
z , LEARNEBCK 



; test for debcuncer at max. 
l f not at max increment 

; increase the learn debounce 



Afx OBSTRUCTION OUTPUT ANI L 



fun: 



AU»SIGK 



:es=s lie: 



NOIS: 



cp 
cp 

j- 

xc r 



C P 

dec 
i i 



Z, C€C_-1C." 
LIGHT IS , * ^ 
z,NO-£ 
LIGHT IS , *: 
r.z,N01S 

pC, #k:?kl: 



FLASK_FLAG, £ FLASI* 
nz , dec_light 

FLASK_DELAY 
nz,dec light 



TurnltCf f 



cp STATUS , #RSSTATUS 

■i r z, BlmkLor.e 

; Toggle the wall centre 
cp " STATUS, #WALLOFF 
z, TurnltOn 



rest for nc fiasr. 
if not skip 
test for tirrveojt 
if not skip 
toggle light 
cr.esnotec 



; Keep the vacatic 
; 2 50 ms period 



fiasr. timer 



; Test for in RS2 32 mode 
If sc, don't blink the LED 

; See if the LED is off or on 



:ne .:c:.: 



BlinkDsne ; 



swi: 



;EL EX ; Reset the delay time for charge 
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dec 

jr 

clr 

dec_light : 
cp 

jr 
trr. 

jr 

decw 

jr 

and 

CF 
ji 
c:r 
o: 

exit_light : 



FLASH_CO'JNTER 
nz, dec_light 
FLASK_FLAG 

light_timer_h: , # c ffk 
z, exit_light 
TOEXT, #00010COOe 
nz, exit_lignt 
LIGHT_TIMER 
nz , exit_ligr.t 
pC, # '~LIGHT_Ci; 
L_A_C, ¥00 
z, ex::_ligr,t 
L_A_C 

ledport , #ledh 



; test for the timer ignore 
; if set then ignore 
; Decrement the light every 8 ms 
(Use TOExt to prescale) 

; 

; if timer 0 turn off the light 

; turn off the light 

; Test for in a learn mode 
If not, leave the LED alone 

; Leave the learn mode 
turn off the LED for program! mode 

; return 



. 

; MOTOR STATE MACHINE 



J: 



O 

ru 
o 
o 
o 



Zyj-.Zr.Z'SZ 




cp 


MOT DEL, #DFF:-. 


j r 


z, MCTDELDONE 




MOT DEL 


ELDONE : 




xcr 


p2 , # FALSEIr 


cp 


D0G2 , ¥i 


DP 


ugt , START 


cp 


STATE, #€ 


:f 


ugt , start 


:p 


z, step 


cp 


STATE, #3 


DP 


z , start 


cp 


STATE , ¥ C 


jF 


z,autc rev 


cp 


STATE, tl 


DP 


z,up directicr. 


cp 


STATE, P2 


j? 


z,up pest tier. 


CP 


STATE, *4 


jp 


z , dr. direction 


:f 





; Test for max. motor delay 
; if dc, aor.'t increment 
; update tne motor delay 

; toggle aux output 

; test the 2nd watchdog for proDleir 

,- if problem reset 

; test for legal number 

; if net the reset 

; step meter 6 

; test for legal number 

; if not the reset 
; test for autorev 
; auto reversing 0 
; test for up 

; door is going up 1 
; test for autorev 
; door is up 2 
; test fer autcrev 

; doer is going down 4 
; doer is down 5 



AUTO REV RO'J-INi- 



auto_rev : 

cp 

jr 
and 
clr 
LEAVEREV : 
cp 
j r 

AREVOFF: 

and 

AREVON : 

WIT 
caii 

Gl 

dec 
dec 
ei 



FARE V FLAG , # C E ~ .-. 
nz , LEAVEREV 
pO , #LOW ( -WOKFLIGH" 
FARE'.' FLAG 

MOTDEL, #10 
ult, ARE VON 



; test for the forced up 

turn off light 

; one shot temp test 

; Test for 40 ms passed 

; If not, keep the relay on 



Lag 



pO, #LOW (~MOTOR_UP & ~MOTOR_DN) ; disable motor 



KOLDFREY 

LIGHT_FL.t.G , ±hg:-.T 

AUTO_DELAY 
BA'JTO DELAY 



; kick the dog 

; hole off the force reverse 
; fcrce the light or. r.c tlir.' 

; wait for .5 second 
wait for .5 second 
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jr nz,arswitcn 



test switches 



or 


p2, #FALSEIR 


;LOOK 


FOR LIMIT HERE (No ! 


Id 


REASON, #4 OK 


CP 


L_A_C, #G"?5K 


3P 


nz, SET UF N05LINK 


lei 


LAC, *C"6K 


jF 


SET UF_N05LINr' 


erswitch : 




Id 


REASON, *c :: J 


ci 




cp 


SK_DATA, #CK~_SW 


clr 


SK_DATA 


ei 




jP 


2, SET STOF_STATE 


id 


REASON, #:CH 


cp 


RADIO ex:, *CAAh 


DP 


z,SET STCF_STATE 


exit_autc_re 




ret 





; set aux output 



for FEMA 



o 

HOLS#RE". 



m 

m 
m 
u 

u 



1Z 

di 

clr 

clr 

ei 

ret 



RPMONES, 4=14 4 

rpkclea? , * 

r?>:_ccunt 
brf:: count 



; set the reason for the change 
; Check for learning limits, 
; If not, proceed normally 
; 

; set the state 

; set the reason to command 

; test for a command 



,- if sc then stop 

; set the reason as radio command 

; test for a radic command 

; if so the stop 

; return 



; set the held off 

; clear rprr reverse .5 se: 

; start with a count cf C 
; start with a count of C 





; O DOOF GOING UF 



up_l81re; 



eticr. 



UpReady 



cp 

~ r 

re: 

j • 

call 

Id 

ana 



or 
cp 

CheckUpE-lir.'. 
and 
1c 
t r 

decw 

tm 

DP 



One Pass, S" 
z, UpFeac. 



HOLDFREY 
LIGKT_FLAG , 

P : , *lov; ~y.: 

pC, #LIGKT_ON 
M0TDEL, *1C 
ule, UFOEF 



p2k_skadow. #-blin?'_fik 
p2k, p2k_shad0v; 
pi, *5l:n>_f:-. 

ELINF 

blik:-'_h:, *::c;oo:cr 

2, NctUpSlow 



; kick the doc 

; Test fcr the memory reac. cr.e-sr.ct 

; If sc, continue 

; Else wait 

; held off the force reverse 

; force the light on nc blink 
; cisatle down relay 

; turn on the light 

; test for 40 milliseconds 

; if not timed 

; Turn on the blink output 
; 

; Turn on the blinker 
; Decrement blink time 
; Test for pre-travel blinking done 
; If not, delay normal motor travel 



UPON : 

UPCFF : 



or 



cp 



1c 

SKI r'-r.-:!'! 



p0, # (MOTOR_UF ! LIGHT_ON" ; turn on the motor and light 



fo? ce_:gno?e , * : 
r.c, sv:ftfrf v 
??y_a::';yt, = — ■ 

uCt,SFI? 
FAULTCODE, *Zir. 



; test fro the end of the force i one re 
; if net donct test rpmccunt 

; test fcr less t:.e 2 p-lses 
; 
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cp FORCE_IGNORE, #0C 

j r nz , test_up_sw_pre 

TEST_UP_FORCE: 
di 

rpm _time_out 
brpk time out 



dec 
dec 
ei 
jr 
cp 
jr 

TestUpFcr cePot : 
di 
cp 
jr 
jr 
cp 
jr 



z , f ailed_up_rpm 
RampFlag, #RAKPU? 
z, test up sw 



f ailed_up_rpir.: 



R?K_PERICI_HI, uF_FORCE_K: 
ugt, f ailed_up_rprr. 
ult, test_up_sw 

rpk_per:od_lo, uf_force_lc 

ult, test_up_sw 



; test timer for done 

; if timer not up do not test force 



; decrease the timeout 

; decrease the timeout 



; Check for ramping up the force 
; If not, always do full force check 

; turr. off the interrupt 
; Test the RPK against the force setting 



Id 
cp 
DP 
id 



REASON, #2 OH 
L_A_C, #C6K 
nz, SET_STO?_STATE 
L_A_C, #07 7H 
SET STOP STATE 



test 



up_sw_pre : 
'di 



test 



dec 
dec 
up_sw : 
di 
Id 
Id 
sub 
sbc 
cp 
Dr 
cp 
jr 
ei 

;Unknown 
sub 
sbc 
ace 
aa: 
UpPosKnoA-r.: 
ei 
cc 
jr 
cc 
jr 
cp 
jr 

TestFor PastUp : 



FORCE_ IGNORE 
E FORCE IGNORE 



U 



o 

# ; 

o 

CI 



LIK_TEST_ 
LIK_TEST_ 

limjtest" 
lik_test~ 
positiok_ 

ugt, Up?; 



HI, POSITION_HI 

LC, P0SITI0N_1C 

"lc, UP_LIKIT_LC 

"hi, UF_LIKIT_HI 

"HI, pZhl'r. 

•sr'r.cwr. 



POSITION_HI, #05IH 
uit, UpFcsKnowr. 



LIK_TE£T_ 
LIK_TE£T" 
LIK_TEST_ 
LIK TEST" 



KI, 
LC, 
HI , 



*:€2H 
# C " Fr. 
ON Z.ZI 



ik: 



hi 



close ) 

jr 

At 'JpLiir.it : 

Id 
cp 
jr 
cp 

jp 

Id 

:■? 

ReLearnLirr 



get_sv 



l_a_o, *c - ::- 

z, test_ur_tire 

lik_test_ki, 

nz, TestFcrPastUr 
LIM_TEST_LC, #0C 
z, AtUpT1rr.1t 

,iv_test_ki, 

z, get_sw 

REASON, #5 OH 

L_A_C, #072K 

z, ReLearnLirr, 

L_A_C, #I76H 

nz, SET_UP_POS_STATE 

I_A_C, #?7iK 

SET UP PCS ST All 



."-1 ^ ) 



£ET_U?_?OS_= 

l_a_c, #c~::- 

z,NotUp£lcv 



; set the reason as force 
If we're learning limits, 
then set the flag tc store 



lalculate the distance from the up limn 



Test fcr lest door 

; If not lest, Iir. 



it test is dene 



; Calculate the total travel distance allcwe: 
; frcr. tne floor when lost 



; 
; 

:f we're positioning the door, fcrget the lirr.i: 
; ana the wall control and raaic 
; Test fcr exactly at the limt 
; If not, see if we've passed the lirr.it 



; Test fcr a negative result (past the lim: 

; If sc, set the limit 

; set the reason as limit 
; If we're re-iearnmg limits, 
; jump 

; If we're learning limits, 

; then set the flag to store 

; 



; Test fcr positioning the up lirr.it 
; If sc, don't slow aewn 
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TestUpSlow: 
cp 

jr 
cp 

jr 

UpSlow: 

Id 

Not'JpSlow: 
Id 
cp 

j F 

di 
cp 
clr 
ei 
jr 
jF 

test_up_tiTTie : 
Id 

decw 
jF 

exit uc cir: 



LIM TEST HI, #HIGH(UPSLOWSTART) ; Test for start of slowdown 

nz,~KotUpSlow ; (Cheating — the high byte of the number is zerc 

LIM_TEST_LO, #LOW {UPSLOWSTART} 
ugt, NotUpSlow ; 



RampFIag, #RAMPDOWN 

REASON, #10K 
RADIO_CMD, # OAAK 

z, set_s?of_state 

REASON, #:0H 

SK_DATA, #CMD_SK 
SW_DATA 

ne, test_up_time 
SET_STOF_STATE 

REASON" , #7 OH 
MOTOP_TIME? 
7 . CF- STATE 



Set the slowdown flag 

; set the radio command reasor. 
; test for a radio command 
; if sc stop 

; set the reason as a c omnia nd 
; test for a command condition 



; set the reason as a time out 
decrement motor timer 



DOC 



ut_ygcsitic: 
= = KD7 



CP 
jr 
an: 



LEAKE II GH7 

= Id 
UPfejFLASK : 

lr cp 

UrpffKCFF: 
a n u 

ufmkon-. 



FAREVFLAG , #CS6H 
r.z , LEAVE LI GHT 

pC , #low (-workligk: 



LIGHT_FLAG, #0 0H 

MOT DEL, *1C 
ult, UFLIKON 

pi , *L3W ■ ~KOTO?_'. 

lac, # : " ; :-. 



j - 

Id 

di 

c? 

clr 

ei 

ret 

setdndirsta: 

Id 
DP 



SK_DATA, *LIGFT_S 
z , wcrk_up 

reason, *1ck 
radicjdmi, *:aah 

z, SETDKDIRS7A7E 
REASON, *00H 

SVT_DA7A, #CKD_SK 
SK_DATA 

z, SE7DNIIRSTA7E 



ONEF2 , #10 

SET DN DIR STATE 



; kick tne dog 

; test fcr the forced up flag 

,- turn cff light 

; skit clearing the flash flag 

; allow blink 

; Test for 40 ms passed 
; If net, keep the relay on 

'CTOF DN ; disable motor 

,- If we've beg jr. the learn limits cy: 

; tnen aelay before traveling 
; light sw debounced? 

; set the reason as a radic cc 

; test for a radic crr-d 

; if sc start down 

; set the reason as a commanc 

; command sw debounceo? 



; if command 



; set the 1.2 sec timer 



LACUPPOS : 



decv 



: w c 1 ^ : 



,r - ime-.< 



# H I GH ' LACTIKE 



MCTOR_TIKEF 



Make s:re we're set tc the prcter 



Count down more time 
If net time a out, le= 
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Id 

clr 

clr 

clr 

clr 

Id 

3P 



L_A_C, #074H 

UP_LIMIT_HI 

UP_LIMIT_LC 

POSITION_HI 

P0SITI0N_L-0 

PassCounter, 



#030H 



J 



SET DN DIR STATE 



Set state as traveling down in LAC 
; Clear the up limit 
; and the position for 
; determining the new up 
; limit of travel 

Set pass points at max. 

; Start door traveling down 



work_up: 

xor 
Id 
ana 
up_pos_ret : 
ret 



pO, #WORKLIGHT 

light_time?_h: , *:ff.- 
SW CAT A, #LOW ~i:ght_sw 



; toggle work light 
; set the timer ignore 



; Clear the workiight bit 



; return 



DOOR GOING DOWN 



dr._directior. 
WDT 
cp 
jr 
ret 

DoigfF.eady : 



ca__ 
clr 
Id 
ar.d 



01 

m 
m 

L* 

J: 

CheckDnBl ir.K 

M 

D 

ru 

a 
o 



OnePass, STATE 
2, Dowr.Reazy 



HCLDFRE.- 
FLASK_FLAG 
LIGKI_FLAG, #LIGK7 
pC , #LOW ~KOTO?_C" 



or 
cp 
jr 



and 

Id 

or 

decw 

tm 

jr 



DN0FF: 

CF 
jr 
cp 

D' 
la 

SKI PDNR ?';-:: 
cp 



pC , #LIGK7_0N 
MOT DEL, *1C 
ule, DNOFF 



P2K shadov. , = ~el::::-_fi: 

P2F.7 P2K_SHAD0K 

P2, #5linf_f:n 

BLINK 

blink_h:, #:oc : :•: : :r 

z, NctLnSlcv. 



pC , * >:oto?_d:: l:g:-:._on 

fop.ce_igkc?e , * : : 
nz, skipdnpf:-: 
rpk_aco'jnt, 

ugt, SKIPDNF ?M 
FAULTCODE, #C5r. 

force_ignore, *:: 

nz,test or. sw pre 



; kick the dog 

; Test for the memory read one-shot 
; If sc, cor.tinje 
; else wait 

; hold off the force reverse 
; turn off the flash 
; force the light on no blink 
; turn off motor up 

; turn on the light 

; test for 40 milliseconds 

; if not timed 



; Turn cn the blink output 

; Turn on the blinker 
; Decrement blink time 
; Test for pre-travel blink done 
not, don't start the motor 



; turn c: 



tr.e rr.ctcr ana light 



; test fro the end of the force ignore 
if net dcr.ot test rpmcount 

; test for less the 2 pulses 



test timer for done 

if timer not up do not test force 



TEST_DOWN_F0RCE 
di 
dec 
dec 
ei 
jr 
cp 



RPK_TIME_07: 
BRPK TIKE OZ 



TestDcwnFcr : 
dl 

- 

jr 
c? 
jr 



z, f ailed_dr._rprr 
RampFlag, # RAM PUP 
z, test_dr._s-.. 
rzz : 



?.?:-:_?E?:c:_h: , 

ugt, f=i-ec_cr_ 
ult, test_dr._sv 
??I-:_FEFICI_LC, 
ult, test cn s> 



; decrease the timeout 

; decrease the timeout 



; Check for ramping up the force 

; If net, always dc full force cherx 

; turn off the interrupt 
; Test the RPM against the force setting 
; if toe slew then force reverse 

; if faster then we're fine 



fcpce l; 
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failed dn rpm: 



cp 


L_A_C, #074H 


; 


Test for learning limits 




jp 


z, DnLearnRev 


; 


If not, set the state normally 




tir. 


POSITION HI, #I10DG000d 




; Test for below last pass 


point 


j r 


nz, DnRPMRev 


; 


if not, we're nowhere near the 


1 imi t 


trc 


LIK TEST HI, #10000C0Cb 




; Test for beyond the down 


limit 


jr 


nz, DoDownLiir.it 




; If so, we've driven into 


the down 


DnRPMRev : 










Id 


REASON, ¥2 OK 




,- set the reason as force 




cp 


position hi, *ce:k 


; 


Test for lost, 




jP 


ugt, SET AEEV STATE 


; 


if net, autcreverse normally 




cp 


position hi, #:5::-. 


; 






jp 


ult, SET_AREV_STATE 








di 






; Disable interrupts 




Id 


POSITION_HI, #C7FK 




Reset lost position for max. travel up 


Id 


position_lc, #js:h 








ei 






; Re-enable interrupts 




:f 


SET_ARE\_STATE 








DnLea mnev : 










Id 


L_A_C, #C£K 




Set proper LAC 




3P 


SET_AREV_STATE 









o 

teg*5_cr._sv._p r 

.5 Qi 

m dec 
te|ti_dr._sw: 

U 
=JS 
U 

3 

G 
!!J 
O 
O 
O 



di 
cp 
ji 
cp 

".Z-imGooa 
Id 
la 
sub 

SDC 

ei 



FOR CE_ IGNORE 
E FORCE IGNORE 



POSITION_KI, #C5CH 
ult, TestDr.LimGocd 
POS I T I ON_H : , # Z 5 H 
ult, KctLr.Slc* 

lik_test_h:, dkjlikit_k; 

lik_test__lo, dn_likit_lc 

lik_test_lo, positional: 

lik test hi, position kz 



=P 



- r 

cp 
3* 

DcDownLiirit : 
ia 
cp 
jr 
Id 

TESTRADIC: 
cp 
jr 
cp 
jr 
Id 

TESTFORCEIG: 
cp 

- r 



N CARE '."IN : 
ar.o 
DP 

call_sw_cr. : 
c? 



L_A_C, *CTCH 

uge, test_ar._tire 

lik_test_hi, 

z, call_sw_dr. 
LIK_TE3T_LC, *'2£5 
ugt, NctDr.SlCv. 

reason, * 5::-. 

CMD_DEB, K'FFh 
nz , TESTRADIC 
REASON, *9GK 
TESTFORCEIG 

LAST_CKO, #C: 
nz , TESTFORCEI G 
CodeFlag, #3RECEIVEI 
nz, TESTFORCEIG 
REASON , # OAOK 

FORCE_I GNORE , #00H 

z,NOAPEVON 

REASON", * iZr. 

S E T_ ARE \'_ S T AT E 

pC,*L0'.\" ~KCTC?_IN 
SET DN FCS STATE 



56 



LIK TEST H: 



#:-:igh .lnsloastar: 



; Test for lost in mid tra\ T el 
; 

; If so, don't test for limit until 
; a proper pass point is seer. 

; Measure the distance to the down lirr.it 



; If we're m the learn cycle, forget the lir.t 
; ar.a ignore the radio ana wall ccr.tr:! 
; Test fcr a negative result ;past the ao> 

; If so, set the limit 

; Test fcr 3c pulses (3"; beyond the lirr.it 

; if net, then keep driving ir.ee the floe: 

; set the reason as a limit 

; test for the switch still held 

; closed with the control held 



; test for the last command being radio 
; if not test force 
; test fcr the b code flag 

; set the reason as b code to limit 

; test the force ignore for done 

; a rev if limit before force er.atle: 

; earli limit 

; set autoreverse 



; set the state 

; Test for start cf slowdown 
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J 



cp 
jr 

DnSlow : 

Id 

NotDnSlow: 

Id 
cp 

DP 
Id 
di 

CF 
cl r 
ei 
DP 

test_dn_time 
Id 

de =w 
jP 

rest_obs_cou 
cp 
j r 
cc 



nz, NotDnSlow 

LIM_TEST_LO, # LOW ! DNSL0WS7ART ) 
ugt, NotDnSlow 



(Cheating — the high byte is zero) 



OBSAREV : 
lc 

M; Id 



0&S/7ES7E : 

i y cc 



RampFlag, # RAM? DOWN- 
REASON, #10H 
RADI 0_Ct-5D , # OAAH 
2, SET_AREV_STATE 
REASON , #0GK 

SW_DATA, #CKI_SW 
SK_DATA 

z, SE7_AREV_STATE 

REASON , #7 OH 
MOTOR_TIMER 
z, SET_AREV_STATE 
.nt : 

OBS_COUN7, #00 
nz, ex;t_ar._c:r 
FORCE_I GN ORE , #;ONE_SE7 
ugt, exit_ar_iir 

last_ck: , *oc 

z, OBS7ESTB 
CKD_DEE, ¥ C FFr. 
nz, 0BSARE7 

exi t_dr._di r 

FLASK_FLAG, #CFFH 
FLASK_CO'JNTEF , *2C 

REASON, #3 Or. 
SE7 AREV S7ATE 



CodeFlag, fcEREC^IVr: 
nz, OBSAREV 



Set the slowdown flag 

; set the reason as radio command 
; test for a radio command 
; if so arev 

; set the reason as command 
; test for command 



; set the reason as timeout 
decrement motor timer 



Test the obs count 
if net done, don't reverse 
Test for 0.5 second passed 
if within first C.5 sec, ignore it 
; test for the last command from radio 

if last command was a radio test b 
test for the command switch holdm 
if the command switch is not hcldi 
do the autorev 
otherwise skip 

; set flag 
set for 10 flashes 

set for .5 Hz period 
set the reason as aitoreverse 



,- test for the b code flag 
if net b code then arev 



return 



DDO? DOWN 



ar._pos:t::r. 
W77 
cp 
jr 
ana 
jr 

DN LEAVE L : 

DNNG FLASH : 
cp 
D r 

DNLIMOFF: 

ana 
DNLIMON : 



la 



13 

a: 
op 



FAREV FLAG , * 0 8 6 H 

nz, DN LEAVE L 

pO , tf LOW , -WORKL7GK7 . 

DNNOFLASK 



IGH7 



.AG , * 0 C r 



M07DEL, #10 
Ult, DNLIKON 



; kick the dog 

; test for the forced up flag 

turn off light 

; skip clearing the flash flat 



; allow blink 

; Test for 40 ms passed 
If not, keep the relay on 



pO, #LOK i~MOTOR_UF & ~M070R_DN; ; disable motor 
.. j.,- debounced? light 



SW_7.--7A, *LIGr7_ = 
z, wcr.--._or. 
REASON, *:Ch 

REASON, tOZH 

SW DA7A,#Ci-:r s/.- 



set the reason as a radic cc 
test fcr a radio command 
if so gc up 

set the reason as a command 



; command sw pressed' 
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j 



clr 
ei 
jr 
ret 



SW_DATA 

z , SETUPDIRSTATE 



-.ETUPDIRSTATE : 

Id ONEP2,#10 



'ork_dn : 

xcr 

Id 

and 

ln_pos_ret 
ret 

. 

; 

; -- 



SET UP DIP STATt, 



pC, #KDRKL.IGKT 

light_tiker_ki , #cffh 

svc data, * lov: '- l:ght_svc 



; if so go up 



; set the 1.2 sec timer 



; toggle work light 
; set the timer ignore 
Clear the worklight bit 

; returr, 



STOP 



stop : 

WDT 

cp 
jr 

a 7r 

Xf.'vUTOF: 

pi id 
57 OPIJC FLASH 

: r 

3TOPR3DCFF: 

,C and 
BTOHfeSDON :' 

- :r 

id 
cc 

jP 
Id 
ci 
cp 
clr 
ei 

:■? 

ret 
tcp : 
xcr 
Id 
ana 
stop_ret : 
ret 



FAREVF1AG, *:~&H 
T.z, LEAVE STC= 
p:,±=lCv: -KCr KLI G- 

LIGHT_FLAG, * C Oh 

KOTDEL, *1C 
ult, stcpkidcn 



; kick the dog 

; test fcr the forced up fl 



lis: 



; allow blink 



; Test for 40 rr.s passed 

; If not, keep the relay on 



pC,#L0W ~MCTC?_7F & ~KCTOr_DN" ; disable motor 



O 
III 
O 

P 

o 



crk 



SVC_DATA, *L_GK7_SV: 

z, «:r.<_s:c: 
REASON, #1CK 
RAD I C_CKD , *= I AAH 

z, se7_dn_di?_state 

REASON, *C:H 

svc_DA7A, _sv; 

Sa DATA 

c,set st-te 



pC #kopki.:gh7 
ligkt_t:me?_hi, #:ff:-. 
SK DATA, tiov: ,~dig.-:t_s'. 



; deoo-nced" light 
; 

; set the reason as radio commanc 
; test fcr a radio command 
; if so go down 

; set the reason as a command 

; command sv pressed? 



. f so gc aov 



; toggle work light 
; set the timer ignore 
Clear the worklight bit 

; return 



SE7 THE AUTOREV STA7E 
SET ARE'.' STATE: 



di 






cp 


L_A_C, #07 OK 


; Test 


jr 


uge, LearningRev 




CP 


POSITION_HI, #020K 


; Look 


jr 


ult, DoTheArev 




= P 


fcs:t =:::.-. 


; Loc< 


j- 


ugt, DcTneArev 





;C::.erA':se, we re _cs. 
cp REASON, #:2Ch 

-r uge, DcTneArev 

clr RADIC Cy.l 



; If not, do a normal autoreverse 

for lost postion 
; If net, proceed as normal 
for lest postion 
; If not, proceed as normal 

;re commands 

; Don't respond to command or radio 

; Throw Out the radio commanc 
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ei 
ret 



; Otherwise, just ignore it 



DoTheArev : 

Id 
Id 
clr 
jr 

Learr.ingP.e-. 

Id 

cir 

cp 

jr 

cp 

D r 



STATE, #AUTO_REV 
RampFlag, *STIL: 
PowerLevei 
SET ANY 



STATE , #AVT C_RE". 

RampFlag, #3TIL1 

PowerLevei 

L_A_C, *C5K 

nz, ErrcrLearnArev 

PassCcunter , #CJCH 

z, ErrorLearnA.rev 



GoodLearnArev : 



cp pgsition'_k: , #cc 

-jr nz, DnLmGood 

cr pcs:t:ck_ic, *z: 

ir ult, KoverassPci: 



Dr* 



yi 
CI 

w 
: p 

Er=£orLearnArev : 



irr : 
o: 
Id 
id 
ado 
adc 
jr 



FassCc ,r.:e: 



dn_l:x:t 
dk_likit~ 
dn_likit~ 
dn_likit~ 

SET ANY 



* - .. - . v _ ->-r 



PCS ~ 

pes: 
*; i 



; if we got here, then reverse motor 

; Set the FET's to off 

; 

; Done 



; if we get here, then reverse motor 
; Set the FET's to off 

; Check for proper reversal 
; If not, stop the learn cycle 
; If we haven't seen a pass point, 
; then flag an error 

; Test for down limit at least 
; 2C pulses away frorr. pass point 

; If net, use the upper pass point 

; Set at lowest pass point 

; Set the new down liir.it 



PassPcmt : 

PJ 

o 
o 
a 



T_A_C, 
SET a:" 



cp 
Or 
di 
add 
as: 
aa; 
adr 
ei 
cr 
-i r 



PassCcunter, #C2FH 
z, ErrorLearnArev 



; Add m a pulse to guarantee reversal eff the block 



; Set tr.e error in learning st; 



; If we have only one pass point, 

; don't allow it to be this close to tne floor 



position_lo, 
pcsit:cn_h: , 
u?_li>::t_l: , 

VF_LIMIT_h: , 

Pass Counter , 
GctDr.Lirr 



#10K ,?f; 
#HISH r'z 

*ldw =?: 

*h!Th ?: 



intpylses 

:int?ylses 

intfylses 

~ I!. - r - . 



cr c 



; Use the next pass point up 



; Set pass counter at 



SET THE STOPPEC STATE 



SET_STOF_STATE : 
di 
Ct 

3- 
cp 
jr 
cp 
3r 



L_A_C, #07 OH 
uge, DoTneStcp 
POS ITION_HI , # 02 Oh 
ult, DoTneStcp 
POSITION_HI, #0DOK 
ugt, DoTneStcp 



; If we're in the learn mode, 

; Then don't ignore anything 

; Lock for lost postion 

; If not, proceed as normal 

; Look for lost postion 

; If not, proceed as normal 



; : 

Dr 
cl r 
e: 
ret 



:herwise, we're Its 

p.easo:.", *:2::- 

uge, DoTneStcp 



re commands 

; Ten 't respond tc commar.0. or radic 
; 

; Threw c-t the raaie ccrvar.e 
; Ctr.erwise, >s; ignore it 



DoTneStcp : 
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Id STATE, # ST OP 

Id RampFlag, #STILL ; Stop the motor at the FET ' s 

clr Power Level ; 
ir SET ANY 



SET THE DOWN DIRECTION STATE 



SET DK DIP. STATE: 



Id BLINK_HI, # C FFH 

call LookFcrFiasr.er 

tir. F2, *5LINK_?IN 

jr nz, SET_DN_NOELINF 

Id BLINF_LC, # C FFH 

Id BLINK HI, #:iK 



; Initially disable pre-travel blink 
;Test to see if flasher present 
;If the flasher is not present, 
; don't flash it 

;Turn on the blink timer 
; 



SET DN NOBLINK: 



o 

m 

01 

w 



di 
Id 
la 
Ic 



cp 

jr 

cp 

DP 
cp 

DP 



RampFlag, #RAKP'JF 
Power Level, #4 
STATE, *3N_DI?.ECTI0: 
FAFEYFLAC- 

L_A_C, #CHCH 
uge, SE7_ANY 

POSITION_Hr, *C2C.H 
ult, SET_ANY 
POSITION_HT, #OD0H 

ugt, se: w;v 



; Set the flag to accelerate motor 

; Set speed at minimum 

; energize door 

; cne shot the forced reverse 

; If we're learning the limits, 

; Tnen don't octher with testing anything 

; Look for lost postion 

; If not, proceed as normal 

; Lock for lost postion 

; If not, proceed as normal 



O 
III 
O 

O 
O 



cp FirstRur., #CC 

jr nz, SET_ANY 

tm PassCcunter, #0111111 lb 

jr 2, SET_UF_DIF._STATE 

tcr PassCcar.ter , *Cllllllib 

jr 2, SET_UF_DIR_STATE 

j r SET_ANY 



If this isn't our first operation when lo 

; then ALWAYS head down 

; If we are below the lowest 
pass point, head up to see it 

; If oj: pass point number is set at 
then go up to find the position 

; Otherwise, proceed normally 



SET THE DOWN POSITION STATE 



SET_DN_PCS_STATE : 
di 
la 
Id 
clr 
jr 



state, *dn_fcs:t:: 

RampFlag, * ST ILL 
FowerLevel 
SET ANY 



load new state 

; Stop the motor at the FET ' s 



SET THE UP DIRECTION STATE 



SET UP DIR STATE: 



Id BLINK_HI, # 0 FFH 

call LookFcrFlasher 

tm P2, #BLINK_PIN 

jr r.z, SET_V?_NOrLZ 

la ELIN: _LC , *:FFr. 

la ELINF KI, #C1K 



; Initially turn off blink 
;Test to see if flasher present 
;If the flasher is not present, 
;ocr.'t flash it 

; Turn cr, the blink timer 



SET u; 



di 
ic 
Id 



Rar.pFlac, *FAM?'_'r 
PowerLevei, *4 



Set the flag tc accelerate tc max 
Start speed at minimum 
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1 

I 

} 



la STATE, #UP_DIRECTI0N 

j r SET_ANY 



SET THE UP POSITION STAT; 



SET_UF_POS_STATE : 
di 

Id STATE, #UP_P0SITI0N 

Id RampEIag, #STILL ; Stop the motor at the FET's 

clr PowerLevel ; 



SET ANY STATE 

; 

SET_ANY : 

and 
Id 
and 



P2K_SKAD0K, #~ELINK_FIN 
P2K, P2M_SHADOW 
P2, #~BLINK PIN 



CF 

jr 

PreFFcmt 
c r 



o 

Ki-Pre??: ir.-. : 

01 ana 
P reF Pcir.tDcne 



PPOINT_DEB, #2 
ult, NcPreFPcir.t 

PassCc ;:.:er , tl'.Z 
PreFFcir.tlcr.e 

FassCcur.te:, #Ci; 



.lilt 



w 


Id 




Id 


=P 


di 




clr 




clr 


=■ 






la 


M= 


Id 




Id 




la 




Id 




ei 




di 




cp 




jr 




p -h 




push 




1 0 




Id 




sub 




sec 




cp 




J- 




jr 




cp 




jr 


DoorlsShort 




lc 




jr 


DoorlsNorm : 




Id 



FirstRur., *CFFH 
BSTATE, STATE 



; Turn on the blink output 
; 

; Turn off the light 

; Test for pass point being see: 

; If signal is low, none seen 

; Flag pass point signal high 



; Flag pass point signal low 

; One-shot the first run flag DONE IN VS 
; set the backup state 



RPK_C0UNT 
BP.?y._CO-N"T 

AUTC_DELAY, f A'_"7:_REV_TIKE ; 
BAU T C_DE LAY , #AuT0_REY_TIME ; 
FORCE_IGN0RE, #0NE_SEC 
BF0RCE_IGN0RE, #0NE_SEC 
RPK PERIOI HI, #CFFH 



L_A_C, #17CK 

uge, Learr.XcceKctcr ; 

lik_test_:-:i 

LIK_TEST_LC 

lik_test_k: , 
lik_test_lo, 
lik_test_lc, 
lik_test_hi , 
lik_test_ki, 

ugt, DoorlsNorr. 
ult, DoorlsShort 
LIK_TE£T_L0, *L0Vt , ShCRTDOCR 

ugt, DoorlsNorr. 



; clear the rpir counter 



set tne .5 second auto rev timer 



set the force ignore timer to one sec 
set the force ignore timer to one sec 
Set the RPM period to max. to start 
Flush out any pending interrupts 



CN_LIKI7_KI 
DN_LIKI7_LC 
UF_LIKI7_L0 
•J? LIMIT HI 



If we are ir. learn mode, 

oon't. test the travel distance 

; Save the I1rr.1t tests 

; 

Test the doer travel distance tc 
see if we are shorter than 2 . 3K 



*high ishortdoor: 



If we are shorter than 2.3K, 

then set the max. travel speed to 2/3 

Else, normal speed 



MaxSpeed, #11 
DoorSet 

MaxSpeed, #20 



; 



Set the max. speed to 2/3 



DoorSet : 

pop 

pep 
1 o 
io 

MctcrTir.eSet 
ei 
clr 
clr 
lc 



lim_test_lo 
lik_test_hi 

kotof_t:ke?_hi, *hig.-. koto? tiki 

MOT OF TIKEF LC, #L0K 'KOTCF.TIKE 



Restore the limit tests 



RAIIOjCKI 

fpk_aco*jnt 
stackreason , reason 



; one shot 

; clear the rpm active counter 
save the temp reason 
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i 



Id STACKFLAG, #OFFK 

TURN_ON_LIGHT: 

call SetVarLight 

tm PO, #LIGHT__ON 

jr nz.lighton 

lightoff : 

clr MOT DEL 

light on: 

ret 



; set the flag 

; Set the worklight to the proper value 
; If the light is on skip clearing 



; clear the motor delay 



LearnModeMctcr : 

Id MaxSpeed, *12 ; Default to slower max. speea 

la MOTOr_TIKER_K: , #KIGh ; LEARNT IMEj 

Id MOTOR_TIMER_LC, #LOK (LEARNT I ME) 

jr MotorTimeSet • Set door to longer run for learn 



THIS IS THE MOTOR RPM INTERRUPT ROUTINE 



RPM: 



pusr 

srp 

Id 



tm 
j - 

RPMIJMEERRO? 
tir. 
j r 

decw 
RPM#€MEOK: 
cp 



trr. 



RPMljsGocd: 

f=i and 



rp 

#RPM_GROUP 

rpr._terr.p_cf, TC_CFLOV; 
rp:r_terr.t_.-.i , TCEXT 
rprr._terr.p_io, 7 S 
IRC, #000100C0E 
Z , RPM7IME0K 



rpir._terr.p_Ic, £ 
z, RPMTIKEOK 
r prr._t err.p _h i wo r d 

RPM_FILTEF, *12£ 
ult, R€:€Ct:. r .6r?:- 

F3, #o:o:::iC5 

nz, RejectTheRPK 



inr, # : i : i : 1 1 

divccur.ter, tC3 



Di^aideRPMLo; 
rcf 
r rc 
r rc 
rrc 
dinz 



rpr_terr.p_cf 
rprr._temp_hi 
rpir._terrp_lc 

divccunter, DivideRPMloop 



; save current pointer 

jpcir.t to these reg 

; Read the 2nd extension 

; reac the timer exter.sicr. 

; read the timer 

; test for a pending interrupt 

; if not then time ok 

; test for timer reload 

; if no reload time is ok 

; if reloaded then dec the hi tc resyn; 



Signal must have been high for 3 ms before 

the pulse is considered legal 

If the line is sitting high, 

then the falling edge was a noise pulse 



turn off the interupt for up to 500uS 
Set to divide by 8 (destroys value in RPM_FZ 
Reset the carry 

Divide the number by £ sc tr.at 
it will always fit within 16 bits 

Loop three times (Note: This clears RPM_FI LTE? 



Id 

sufc 

sbc 

Id 

Id 

cp 



TULS: 
INCRPM: 



mc 

SKIFC : 

ir.c 
cp 

UpTimeOut : 



rprr_perioc_lc, rprr._past_ic 

rpm period_hi, rprr,_past_hi 

rpr. per ioc_lc , rpr_terrp__ : 

rpm_period_hi , rpm_temp_hi 

rpm_past_Io, rpm_temp_lo 
rpr_past_hi, rprr_temt_ni 

rprr._pe r i od_h i , * 1 2 
ult,SKIPC 



RPM_COUNT 
BRPM COUNT 

RPM_ACOUNT 
Rar.pFlag, #RAM?Ur 
z, MaxTireCut 
STATE , # DN_D I RE CT I ON 
z, DcwnTimeOut 



find the period of the last pulse 

Store the current time for the 
next edge capture 

test for a period of at least 6.1<3 4mS 

; if the period is less then skip counting 



; increase the rpm count 

; increase the rpr ccur.t 

; increase the rpm count 
; If we're ramping the speea up, 
tnen set the timeout at max. 

; If we're traveling down, 

>->-■ - f ror. tr.e dev.- for: 



then set the time: 
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Id 
rcf 
rrc 
add 

jr 

MaxTimeOut : 

Id 
jr 

DownTimeOut 
Id 
rcf 
rrc 
add 

GotTimeOut : 
Id 
ei 



rprr._t ime__out , UP_FORCE_HI 

rpm time_out 
rpm_time_out, #2 
GotTimeOut 

rpm_t ime_out , #12 5 
GotTimeOut 

rpir_time_out , DN_FORCE_KI 

rprr_tiir,e_oit 
rpr time out, #2 



} 

; Set the RPM timeout to be equal to the up force setting 
; Divide by two to account 
for the different prescalers 

; Round up and account for free-running prescale 



; Set the RPM timeout to be 500ms 
; 

; Set the RPM timeout to be equal to the down force setting 

; Divide by two to account 
; fcr the different prescalers 

; Round up and account for f ree-runr.ing presca,e 



BRPtf TIME_0'JT, rprr_time_out ; Set the backup to the 



value 



Position Counter 

Positicr. is mcrementes wher. going down and decremented when 
aoma up. The zerc position is taker, to be the upper edge of the pass 
point signal (i.e. the falling edge m the up direction, the rising edge m 



•41 cr 
01 3 r 

Ui 1- 



tr.e dowr. c.re::ior. 



STATE, 
z, DecFcs 
STATE, *STO? 
z, DecFcs 

state, ? -;?_?cs:tio: 

z, DecFcs 



Test for the proper directicr. c: 



:r.e col 



At 



Pos 



incw 

u S 

r&Pcint : 

Til 
O 
O 

ll2bnF?cir. 



POSITION 
?FCINT_DE5, #2 
ult, KcI'r.FFcir." 



cr 
~; r 



PassCcir.ter, # 1 2 0C C 0 C 0fc 



tn 


Fc;£::;:.:e:, *i::il 


jr 


z, PestrjnEage 


AtDnEdge : 




<=P 


l_a_c , * : _ 4 y 


1 r 


r.z, Ncrrallcvcr.Iage 


LearnDownEdge 




di 




sab 


UF LIMIT LO, FOSITI 


sbc 


UF LIKIT_KI, POSITI 


aec 


PassCounier 


jr 


Lowestl 


N c rma I Dovr.E d a e : 


aec 


PassCcunter 


trr. 


PassCcunter, #01111 


jr 


r.z, NctLowestl 


Lowest 1 : 




di 




clr 


POSITION_HI 


id 


positic::_i:, *i 


ei 




NctLcvest 1 : 




=7 


ST AT '75 , fr 557.-77 5 




r, I zr.tP-esetWall 3 


Id 


STATUS , #KALLOFF 


clr 




DontResetKal 


.3: 



; 

; Test fcr pass pcir.t being seer. 
; If signal is low, none seer. 



; Mark pass point as currently high 



; Test for pass point seer, befcre 
; If not, then we're past the edge 

; Test for learning limits 
; if not, treat normally 



; Count pass point as being seen 

; Clear the position counter 

; Mark as one pass point closer to floor 

; Test for lowest pass point 

; If not, don't zero the position counter 



; Set the position counter back to zero 



; Test for m RS2 32 mooe 

; If so, don't blink the LEI 

; Blink the LED for pass point 

; Set the turn-off timer 
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PastDnEdge: 
NoUpPPoint : 
and 
jr 



PassCounter, #011111111: 
CtrDone 



Clear the flag for pass point high 



DecPos : 



decw POSITION 

cp PFCINT_DEB, #2 

jr ult, NoUpFPcmt 



UpFFoint : 

tr. 
jr 

AtUpEdge: 

tr. 
jr 

Lowest 2 : 
di 
clr 
cu r 
e: 

Krt H? w€5t:: 

cp 

& ir 

01 Id 

=|j c - r 
DcntSesetKall 

JP jr 
M= la 
Fas„t'JcEdoe : 

CtiSbne : 
ReftictTheRPK: 

n pCF 

Q 



PassCounter, *1000C0CCr 
r.z, PastUpEdge 

PassCounter, #Clllili:b 
nz, NctLowest2 



POSITIOK_KI 
POSITION- LC 



STATUS, #RSSTATCS 
z, Dor.tResetWall2 
STATUS, fcWALLCFF 
VACFLASH 

PassCounter 
PassCounter, FirstR_r. 
ule, FastUpEage 
PassCounter, FirstRur. 

PassCounter, Z Z ~. '. 



Test for pass point being seen 
If signal is low, none seen 



; Test for pass point seen before 

; If so, then we're past the edge 

; Test for lowest pass point 

; If not, don't zero the position counte: 



Set the position counter back to zero 



; Test for in RS232 mode 
; If so, don't blink the LEC 
; Eiinx the LED fcr pass pcir.t 
; Set the turn-off timer 

Mark as one pass point higher above 
Test for pass point above max. value 
If not, we're fine 

Otherwise, correct the pass counter 
Set the flag for pass pcir.t higr. befcr« 



rp 



; return 
; return 



:ne rp 



THIS IS THE SWITCH TEST SC5RCVTIKI 
STATUS 

0 => COMXANI TEST 

1 => WORKLIGHT TEST 

2 => VACATION TEST 

3 => CHARGE 

4 => RSSTA7US -- In RS232 oon't scan for switches 

5 => WALLOFF — Turn cff the wall control LED 

SWITCH DATA 

0 => OPEN 

1 => COMMAND CMC_SK 

2 => WORKLIGHT LIGHT_SK 
4 => VACATION VAC S>." 



switches : 



; 4-22-9" 



C? 
Jr 



LIGKT_DEE, * C FFH 
ICKctHelaDcr. 



; is the light button being held" 
;if not debounced, skip long nolo 
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CP 
JR 
CP 
JR 
LD 

JR 

NotHeidDown: 

CLR 
HeldDown: 



EnableWorkLight, #6j.100000E .--.as the 10 sec. already passed? 
GE, He Id Down 

EnableWorkLight, #C101C:OOB 
LT, HeldDown 

EnableWorkLight, #100G0000E ; when debcunce occurs, set register 

;to initiate e2 write in mainloop 

HeldDown 
EnableWorkLight 



# 

m 
m 
u 



anc 

cp 

DP 

jr 

cp 

cp 
DF 
CF 
DF 
c? 
DF 



TE5 



op 



cp 
and 



:;=, c.r 

N^IFLASKEL 



ru 

# 



ret 

.Ct rl 
ana 
cr 
ir.c 

= F 
- r 



Id 

KeepOff : 

ret 



SW_DATA, #LIGH7_SW 
STAT'JS, #WALLCFF 
ugt, start 
z, NoWailCtrl 
STATUS, fcRSSTATUS 
2, NOTFLASHEC 
STATUS, #3 
z , charge 
STATUS , #2 

z, vacat:ok_test 
STATUS, #: 
z,WORKLlGH7 TEST 



VAC FLAG, #CCH 

z, comma.nl_test: 

VAC FLA Sh 
VAC FLASH , : 
ult, COKKAKCJTE; 
p3 , *-CKARGE_SW 
p3, #DIS_SK 

vacflas:-., # £ : 

nz.NCTF LAS HE! 
VAC FLASH 




ZV.Z DEL EX 



; Clear all switches except fcr wcrklight 

; Test for illegal status 

; if so reset 
; Turn off wall control state 

; Check for in RS232 mode 
; If sc, skip the state machine 

; test for illegal number 

; if it is 3 then goto charge 

; test for vacation 

; if so then jump 

; test fcr wcrklight 

; if so then jump 

; else it id command 

; test for vacation mode 

; if not vacation skip fiasr. 

; increase the vacation fiasr. tirrer 
; test the vacation flash period 

; if lower period skip flash 

; turn off wall switch 

; enable discharge 
; test the time delay fcr max 

; if the flash is not aone ;urrp ar.c 

; restart the timer 

; return 



; Turn off the circuit 
; 

; Update the off time 
:f off time hasn't expiree, 
keep the LED off 

; Reset the wall contrc] 
Reset the charge timer 



commak:_test: 

tir 



tir. 



ckdclose: : 



ca.. 
cai: 
cp 

32: 

di 



pO, * SWITCHES 1 
nz, CIOCFEN 
PO, #SWITCHES2 
nz, CKDOFEK 

DECVAC 
DECLIGHT 
CMD_DE5, #0FFK 
z, SKIPCKLINC 

CKD_DEE 

e:.": :ee 



; command sw pressed? 
; open command 

; test the second command input 



; closed command 
; decrease vacation debounce 

; decrease light debounce 
; test for the max number 
; if at the max skip inc 

; increase the debcuncer 
; increase tne aebouncer 



:?cx:: 



CP 

J r 



cklexit 



nz, ckdex:: 

CmcSet 



; if not made then exit 
; Set the command switch 
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or 

and 

Id 

Id 

CMDDELEXIT: 
ret 



p3, #CHARGE_SW 
p3, #~DIS_SK 

SWITCH_DELAY, #CMD_DEL_EX 
STATUS, #CHARGE 



; turn on the charge system 

set the delay time to 8mS 
; charge time 



CmdSet : 

cp 
jr 
j - 

call 
i r 

RegCmdMake : 
cp 

Norma ICmd : 
di 
Id 
Id 
cp 
3~ 

push 



cmd : 



yj' c r 
Ly call 
CMiMAKEDON: 
SKIji^LEARN : 
=r= 1 ci 
H Id 
= e: 
=-..=. ret 



L_A_C, #070H 
ult, RegCmdMake 
ugt , LeavelAC 
SET_UF_NOELINK 
CMDMAKEDCNE 

LEARN D3, #0FFK 
z, GcIntoLAC 



LAST_CMD, #C55H 

sk_data, #CKr_sv: 

AUXLEARNSK, #100 

ugt , sk:f_lea?.n 

RF 

setlear:;" 

SK_DATA 
R? 

pC, #LI3KT_ON 
TUFK ON LIGHT 



CKD_DES, fcC'FFH 

BCKD dee,#:ffh 



Test for in learn limits mode 

; If not, treat as normal command 

If learning, command button exits 
; Set the up direction state 



; Test for learn button held 
If so, enter the learn mode 



set the last command as command 
set the switch data as command 
test the time 



; set the iearr. mode 
; clear the cmd 

cr. the iiaht 

; turn or. tne light 



; set the debouncer to ff one shot 
; set the debouncer to ff one shot 



Le§;"?eLAC 



clr 
or 



L_A_C 

ledpcrt, #Iedh 
S£T_STCF_STATI 
CMDMAKE DONE 



; Exit the learn mode 
urn off the LEE fcr prograir mode 



Gclnt 



nt Ci.*!.. : 
ic 
clr 

Id 
Id 



l_a_c, k~ok 
fault code 

CodeFlag 
LEARNT, # OFFH 
ERASET, #0FFh 
CMDMAKEDONE 



Start tne -earr. limits moae 

; Clear any faults that exist 
; Clear the regular learn rooae 

Turn off the learn timer 

Tjrr. off the erase timer 



CMDOPEN : 

ana 

or 

Id 

DEL LOO F : 

dec 

jr 

tm 



call 
call 
call 
Id 



p3 , # ~CKARG£._S'v 
p3,#DIS_SW 
DELAYC, #16 

DELAYC 

nz, DELLOOF 

pO, # SWITCHES! 

nz , TESTWL 

DECVAC 

DECLIGHT 

DECCKI 

AUXLEARNSK, #C: 
CMDEXIT 



command switch open 
tarn off charging sw 
enable discharge 
set the time delay 



; loop till delay is up 
; command line still high 
; if so return later 
if not open line dec all debouncers 



turn off the aux iear: 
and exit 



TESTWI 



STATUS, #WL TE5: 



set tc test fcr a 
return 
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} 



WORKLIGHTJTEST : 

trr. pC,#SKITCHE£l 



D r 

call 

call 

cp 

jr 

inc 

SKIPLIGHTIKC 
cp 

j r 

ca- i 
1 r 



nz,TESTVAC2 
DEC VAC 
DECCMD 

LIGKT_DE5, #CFFK 
z, SKI PLIGHT INC 
LIGHT_DE3 

LIGHT CEH,*LI3H" 
r.z, CMDEXIT 
LightSet 
CMDEXIT 



; command line still high 

; exit setting to test for vacaticr 
decrease the vacation debouncer 
and the command debouncer 

; test for the max 

; if at the max skip inc 

; inc debouncer 



test for the light make 
if net then recharge delay 
Set the light debouncer 
then recharge 



LightSet : 
Id 
Id 
cp 



ligkt_deb, * offf. 
sk_cata, #ligkt_ 
rrtc, #rdroft:k" 
ugt, CMDEXIT 
A'JXLEAFKSK 



; set the debouncer to max 
; set the data as worklight 

; test for code reception 

; if not then skip the setmg of flac 

; start the learn timer 



X G 

1c 



STATUS, *VAC_7EST 
suiter cela . , *7AC 



; set the next test as vacation 
; set the delay 



return 



VA£KTIO:-:_T! 

4= dim 



; ca.- 
call 
cp 

VAfetKCSKIF : 



VAC 



cr. 



del a .-, VAC! 



id:, *sv;: 



DECLIGKT 
DEC CMC 

VAC_DEE, *CFFH 
z,VACINCSKI? 



z, VACCVT 

VAC_DEE, *7AC_MAFE_ 
VacSet 



cornar.s line still high 
exit with a error setting ope 
decrease the light debouncer 
oecreaSe the command debouncer 
test for the max 
skip the incrementing 
inc vacation debouncer 

test for vacation mode 

; if not vacation use out tine 

; test for the vacation make p: 
; exit if not made 



VACOU7 : 



j r 
cal 



-•t_~ r-~3 £y;i~ MA?': 
r.z , VACATION_EXIT 
VscSet 

VACATION EXIT 



; test for the vacation make pc 
; exit if not made 

, 

; Forget vacation mode 



VacSet : 



Id 



VAC_CE5, #CFFE 
AuXL-EARNSK , # i 0 C 
ugt, SKIF_LEARKV 
push RF 

srp # LE ARNE E_GR P 
call SETIEA?:: 
pc: RP 

c^ pC , *LIGHT Z'.~ 



; set vacation debouncer tc max 
; test the time 



; set the learn mode 
; Turn on the worklight 



SKIP LH 



set the toaaie dat£ 
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cp RRTO,#RDROPTIME - i test for code reception 

jr ugt,VACATIOK_EXIT ; if not then skip the setmg of flag 

clr AUX LEARN SW ; start the learn timer 

VACATION_EXIT 
Id 
Id 

VACDELEXIT: 
ret 



SWITCH DELAY, #VAC_DEL_EX ; set the delay 

STATUs7# CHARGE set the next test as char 9 e 



EXIT ERROR: 

_ n-'-'-v- ; decrement the debouncers 

call DECVAC 

call DECLIGHT > 

Id SWITCH_DELAY , #VAC_DEL_EX ; set the delay 

Id STATUS, * CHARGE ; set the next test as charge 

ret 



charge : 



or 
and 
dec 
j r 

:h£ige_ret 
«y ret 



p3, #CHARGE_SVC 
p3, #~DIS_SW 
SKITCH_DEL.tY 
n: , char ge_ret 
STATUS, *CKT T: 



DEPCMD: 

-~ cp 

M: di 
_ ce z 

vT." e i 

SKBckDDEC : 

call 
DE^fCKDEXIT : 
EJ ret 



CMC_DE5, *0: 
z, SKIPCKCT: 

bcm: deb 



CMD_DEB, #CKC_ER 
nz,DECCKDEX:7 
CmdRe 1 



CmdRe 1 : 

cp L_A_C, #C"Cr. 

jr nz, NormCmdBreai. 
call SET_STOF_ STATE 
NormCltidEr ea k : 
di 

clr CMD_DEE 
clr BCKI_DE5 
ei 
ret 



test for the mm number 
if at the rr.in skip dec 

; aecre:t.er.t aebour.cer 
; Decrement debc-ncer 



if not at break then exit 

; if not break ther. exi 



; ana exit 

rest for in learn mode 

; If net, treat nont.aliy 
; Stop the doer 



reset the debouncer 
reset the debouncer 



LIGHT_DEE, #0CH 
z, SKIFLIGHTDEC 
LIGHT DEB 



DECLIGKl : 
cp 
jr 
dec 

SKIPLIGHTDEC: 

cp LIGHT_DEB, #LIGHT_EREAK 

jr nz, DECLIGHTEXIT 

DECLIGKTEXIT: 
ret 



test for the min number 
if at the min skip dec 
decrement debouncer 

if not at break then exit 
if not break ther. exit 
reset tr.e aeccur.cer 

ar.c exit 



DECVAC : 



ct 



VAC DEE,*; 



tes 



:.te it: 



numoer 
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dec 
^KIPVACDEC: 
cp 
jr 

3ECVACIN: 
cp 
jr 
jr 



2, SKIPVACDEC 
VAC_DEB 

VACFLAG, #00H 
z, DECVACOUT 

VAC_DEE, # VAC_BRE AK_ i K 
nz, DECVACEXIT 
CLEARVACDEE 



; if at the min skip dec 

; decrement debouncer 

; test for vacation mode 

; if not vacation use out time 

; test for the vacation break pcint 
; exit if not 



DECVACOUT : 
cp 
jr 

CLEARVACDEE : 
clr 

DECVACEXIT: 
ret 



VAC_DEE , # VAC_ER E Ar'_CC : 
nz , DECVACEXIT 

VAC DEE 



; test for the vacation break point 

; exit if not 

; reset the debouncer 

; and exit 



; FORCE TABLE 

J — — — -— — — — — — — —— —— — *— — 

f orce_tab!e : 
f C- 



u 
o 
ru 
o 
o 

Q 





OCGH, 


0 6BH , 


0 cLr. 


byte 


r. r u 


U t a ir. , 


Ti £ ^ 


k>yt e 


n r n 




n - 

v. jr. 


V->- • — c- 

b> -e 


L' J^n / 


LCrr M 




Cy 


'J L w . . , 


r> "7 " ^ 
u - , 


P P TT _: 


byte 




U dr., 


r. r l 


i-jy >- — 


WWW*. , 


C fv 
t - cr. , 


0 6 2 H 


uy u t 


n n Ci v 


nipt 


0 DA. 1- * 


by t e 




p "7 P - 


Pi £ r *^ 


cyte 


L v - . . * 


r ~ £ - 


G " 5 


byte 


r " ' 

^ ^/ V - . , 


OR' F 
^. c - r. i , 


rrf - 




000K 


063K, 


0D6H 




000K, 


08 6H , 


C 9BH 


byte 


00 OH, 


08 9K, 


0"FH 


byte 


00 OK, 


0SCH, 


064H 


byte 


COCK, 


CSFH, 


GABH 


byte 


000K, 


0 92H, 


0F"H 


byte 


0C0H, 


ose:-:, 


oes:-: 


byte 


0 00K, 


C 9 AH , 


GG9H 


ryte 


OCGH, 


OsGH, 


GD5H 


byte 


00 OH, 


0AIH, 


0D2H 


byte 


O00H, 


0A6H, 


0G4H 


byte 


OCGH, 


0AAH , 


C"6H 


byte 


00 OH, 


oaf:-:, 


C2"H 


byte 


00CH, 


0B4K, 


C I CH 


byte 


G00K, 


0BSH, 


05BK 


byte 


00 OH, 


0BEH, 


0EEK 


byte 


00 OK, 


0C4K, 


CD3H 


.byte 


000K, 


0CBK, 


01BK 


.byte 


000H, 


0D1H, 


OCDK 


. byte 


000H, 


0DEH , 


0F4H 


.byte 


0 0 OH, 


0E0H, 


0SCK 


. byte 


000H, 


0E7H, 


01CH 


. byte 


0OOK, 


0EDK, 


0FFK 


. byte 


00 OH, 


0F5H, 


0 4FH 


. byte 


000H, 


0FDH, 


01 5K 


.byte 


001K, 


005H, 


05DH 


.byte 


c : : h , 


CCEH, 


= 


. cyte 


c : : h , 


Cl _ h, 


CASH 


.byte 


o::h, 


C21H, 


GC2H 


.ryte 






: = ~- 


.byte 


: : : h , 


3 ~ "- 


: ~ : h 


. byte 


g::h, 


045K, 


03 AH 


.byte 


cc :h, 


C5 3.H, 


0CEK 


. byte 


gc 


0€2H, 


01 OH 
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.byte 


001H, 


072K, 


07DK 


.byte 


001H, 


064H, 


08 3H 


.byte 


001H, 


098H, 


061H 


.byte 


001H, 


OAEH, 


064H 


. byte 


001H, 


0C6H, 


0E8K 


.byte 


001H, 


0E2H, 


062H 


. byte 


O02K, 


OOIH, 


065H 


.byte 


002H, 


024K, 


CAAH 


.byte 


002H, 


04DK, 


02 4 H 


.byte 


002K, 


07CK, 


01 OH 


.byte 


0C2K, 


0E3H, 


C1EK 


.byte 


002K, 


0F4K, 


C 9 4 H 


. byt e 


0 03K, 


04 3H, 


OCDK 


.byte 


003H, 


0A5K, 


07 IK 


. byte 


004H, 


020K, 


OFCK 


.byte 


004H, 


0C2K, 


03 BK 


. byte 


005H, 


09DH, 


0 6CK 


.byte 


013H, 


012K, 


ore:-: 


63: .byte 


013H, 


C12H, 


CD Oh 



SIN TABLE : 











. WORD 






.kor: 






.WORD 


00000K 




.WORD 


f. r- - r~ f- 

c \j v u r. 




.WORD 


ooco::-. 




. WORD 


C 00 j OK 




. WORD 


OOO00K 




. WORD 


O0OC0H 




.WORD 


OCl'v j r. 




. WORD 


000C0K 




.WORD 


C C C 1 '. K 




. WORD 


ooc-: ::-. 




.WORD 


00000K 




. WORD 


OOOOOh 




.WORD 


0 0C00K 



; N-iTJsers set tc zero (proprietary table; 



SPl|D_TABLE_50 : 



BYTE 


4 0 


BYTE 


34 


EYTE 


^ 


BYTE 


30 


BYTE 


26 


BYTE 


27 


, BYTE 


25 


.BYTE 


24 


. BYTE 


23 


.BYTE 


2 i 


. BYTE 


20 


. BYTE 


±5 


. BYTE 


17 


.BYTE 


16 


. BYTE 


15 


.BYTE 


13 


.BYTE 


12 


. BYTE 


10 


.BYTE 


8 


.BYTE 


6 


. BYTE 


r. 



SPEED_TABLE_€C : 

. . BYTE 2 S 
. BYTE 2" 1 
. BYTE 2 5 

Page 96 of 9 7 




J 



.BYTE 




.BYTE 


22 


.BYTE 


21 


.BYTE 


20 


.BYTE 


1 9 


. BYTE 


18 


. BYTE 


17 


.BYTE 


16 


. BYTE 


1 5 


.BYTE 


13 


. BYTE 


12 


. BYTE 


11 


. BYTE 


10 


.BYTE 


8 


.BYTE 


7 


.BYTE 


5 


.BYTE 


0 



; Fill 4 9 bytes cf unused memory 

FILL1C 
FILL1C 
FILL1C 
, =i FILL1C 

NB fill 

-1 FILL 

fs4 FILL 

n FILL 
FILL 

H s FILL 

J" FILL 

L=-~ FILL 




o 
fy 
o 

D 

o 
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